STRING HANDLING IN ATARI BASIC 


The major difference between Microsoft and Atari BASIC is in the 
handline of string variables. Here is am overview of the Atari 
approach to strings, and a comparison with the Microsoft method. 


x Tt is often necessary to split strings into pieces called 
substrings. In Microsoft BASIC, this is accomplished with special 
fumetions, MIDS, RIGHTS and LEFTS. In Atari BASIC, strings are split 
easily by wsine 3 subscript on the string variable. For example, 
A$(5,10) results in a substring which starts at the fifth character 
of AS and ends at the tenth character. If only one mumber is given 
im the subscript, the substring will start with that character and 
end with the last character of the string. 


Here is 3 table of the Atari equivalents of Microsoft string 
fumetionss 


Microsoft Atari 


MIDS (AS ,X,Y) AS CX,Y) 
LEFTS(AS,X) ASC1L,X) 
RIGHTS (AS ,X) A$ (LENCAS)—X) 


The fumetion LENCA$) is the same im both types of BASIC, and 
returns the leneth, or mumber of characters Cincluding blanks) of the 
strima A$. This fumetion is also used in conmcatinstion of strinas, 
that is, putting two strings together into one string. In Microsoft, 
concatenation is accomplished with 3a plus siqm,. Im Atari, the second 
string is concatenated to the- first by making it &@ substring which 

, starts just after tne last character. Here is an example of two 
; types of concatenation im both BASTCs: 


Microsoft Atari 
AS=AS+ES AS (LEN(CA$) +1) =E% 
C$=AS+ES C$=A$ 


CS$(LEN( C$) +19=8S 


Im Microsoft, the subscript on the string indicates 3a strings 
array, which is handled just like 8&8 mumeric array, Im Atari BASIC, 
however, 8 string array 16 kept in @ very lone string, which is put 
together using concatenation, and taken spart with string splitting, 


3s shown sbove, Here 1s am example of 3 simple string array in both 
types of BASIC? 


MICROSOFT ATARI 

A$(C1)="AAA" ARRAY $="AAABEBCCC" 
A$(2)="BEE" ARRAY$(1,3)="AAA" 
A$(3)="CCC" ARRAY$(4,6)="BBER" 


ARRAYS (7,9)="CCC" 


It 18 often helpful to make all of the substrines im the erray 
the same lemeth; so that it is easy to calculate the position im the 
Brraye This can be done hy padding the smaller substrineas with 
Rlanks. Remember, blank spaces count im the length of the strine, 


EXAMPLE * INVERTING A STRING 


18 GIN He Sa% 

26 IHPUT & 

38 BESSTREC HY 

49 FOR I=1 TO LENG #S> 

56 HSC 1, TD sCHe Se Gale RAC TL T4128 
68 HEXT I:REM THIS OOP INVERTS 
65 REN EACH CHARSITER OF STRING 
78 PRINT SoS 

86 GOTO 2a 
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10 REM ‘“STRARRAY’ WEE 3-18-81 


REM THIS FROGRAM DEMOS THE USE OF 
REM ONE STRING VARIABLE AS A 
REM STRING ARRAY VIA SUBSCRIFTING. 


REM THE FROGRAM WILL HANDLE 100 
REM S3Q-BYTE CUSTOMER NAMES. 


REM RESERVE MEMORY FOR VARIABLES. 
FRE MK XC K KK KKK KK 2K OK OK 3K KK KKK KOK KOK OK OK OK OK OK 


DIM ARRAY$(100*30) ,NAMES$(30) ,ELANK$(30),YN$C1) 


REM DESCRIPTION OF STRING VARIABLES 
FREE M KKK 2K 9K 0K 3K 2K KK KOK OK OK OK KKK 2K KKK KKK KOK OK OK OK 
REM ARRAY$ HOLDS 100 NAMES 

REM NAMES ACCEPTS INFUT FOR NAME 
REM BLANKS USED TO BLANK FILL 

REM YN& ACCEPTS YES-NO ANSWERS 


REM CURRENT VARTABLE LENGTHS 

FREEM 9K 2K 2K 9K 2K KK KK KKK OK KKK OK OK K KK KK 

REM LENCARRAY$)=0 

REM LENCNAMES$) =0 

REM LENCELANKS)=0 

REM 

BLANK $=" ee 

REM LENCBLANK#$)=30 

REM 

REM INITIALIZE THE ARRAY 

FREEM KK 3K 2K KK 2K KKK KKK KOK KK KKK ; 

REM BY INITIALIZING THE ARRAY, MEMORY IS AUTOMATICALLY 
REM ALLOCATED FOR THE ARRAY. THIS IS NECESSARY IN ORDER TO 
REM ACCESS ANY SECTION OF THE STRING ARRAY. IF YOU TRY TO 
REM ACCESS BEYOND THE CURRENT LENGTH OF THE STRING AN ERROR 
REM 

FOR IT=1 TO 100 

ARRAY $ (IK30-29,I30)=BLANKS 

NEXT I 

REM LENCARRAYS$)=3000 

REM 

REM BEGIN INFUT LOOF 

FREEM KK KK KK KK 2K KOK KK KKK 

REM INPUT CUSTOMER # AND VERIFY IT DOESNT ALREADY EXIST 
REM 

PRINT 

FRINT "CUSTOMER NUMBER (1-100. ¢(0=END) "3 

INFUT I 

IF I=0 THEN 500 

IF ARRAY$(I*X30-29,IK30)=ELANKS THEN 400 

FRINT "CUSTOMER NUMBER "323" IS ASSIGNED TO?" 

FRINT ARRAYS (I*X30-29,I«30> 


5 PRINT 


FRINT "DO YOU WISH TO REFLACE" 
PRINT "WITH A NEW NAME CY/N) "3 
INFUT YN& 

IF YN$="N" THEN 300 

Se TNS TS OE THEN. 360 

REM 

REM INFUT CUSTOMER NAME 

FREEM 5K 2K 2K 3K KKK KK KOK OK KKK KOK K 

FRINT "CUSTOMER NAME "3 

INFUT NAMES 


J 


WILL RESULT. 
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REM LENCNAMES$) IS THE NUMBER OF 


REM CHARACTERS INPUT BY THE USER 


REM UF TO 30. IF « 30 CHARACTERS 
REM WERKE: INPUT GY tHE USER, IF IS 
REM NECESSARY TO BLANK FILL NAMES 


REM TO 30. 


Fe MK 3K XK YK OK 9K OK DK OK KK KK KOK KK KK OK CK OK OK OK OK OK OK 


REM 

NAME $ (LENCNAMES$) +1 )=ELANKS 
REM 

REM FUT NAME IN ARRAY 
ARRAY $ (IK30-29,2I*30)=NAMES 
GOTO 300 

REM 


REM ROUTINE TO PRINT CUSTOMER LIST 
FREEM = KKK 2K 2K 9K 9 KKK KKK KOK KKK OK KKK KOKO OK OK KKK 


PRINT 

FRINT "DO YOU WANT TO FRINT THE 
PRAM?  “LiSt 70: THE SCREEN: (Y/N) 
INFUT YN 

IF YN$="N" THEN 340 

LP YNS< >" THEN S10 

FRINT "NUMBER", "CUSTOMER NAME" 
PRINT 

POR I=i-T0O.106 

IF ARRAY#$(IX30-29,IK30)<>BLANKS 
NEXT I 

PRINT 

PRINT "xX END OF LIST xx" 

PRINT 

FRINT "DO YOU WANT TO PRINT THE 
INFUT YN& 

IF YN¢="N" THEN 640 

IF -YRS<S"Y"° THEN S40 

LFPRINT "NUMBER","CUSTOMER NAME" 
LFRINT 

FOR I=1 TO 100 

IF ARRAY$(I*K30-29,0K30) <> BLANKS 
NEAT? & 

LFRINT 

LPRINT “® END OF LIST. 2" 

LFRINT 

LFRINT 

END 


CUSTOMER" 


me 
? 


THEN FRINT I,ARRAY$(IK30-29,Ix%30) 


CUSTOMER LIST TO THE FRINTER (Y/N) 


THEN LFRINT I,ARRAY$(IX30-29,1x30) 
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To find the starting location of 8 particular substring im the 
array AB, use the following formulas? 


C(COL-1L>XCHARD +0 CR OW=1) KCHARKNUMCOL 2-41 


ROW = Row mumber 

COL = Colusam munmber 

CHAR = mumber of characters per element of array 
NUMCOL = total mumber of columns 


Lm the example given, CHAR = 3, and NUMCOL = 4. In order to fined 
tne starting location of ASCROW,;COL)D, where ROW=2 and COL=4, 
perform tine following calcoculstior? 


(4-1) KB2+CC2-1)KBK4 1 = CCBESIECCL)KBK4) 41 = CF)#C12ZI4F1 = 22 


Thus, tie starting character af substring ABCS,.4) is character 
ruiminer 2326 This Substring 16 addressed as ABC 22,24). 


FORMATTING IN ATARI BASIC 


Atari BASIC handles formatting in 3a manner which may 
be unfamiliar to users of Microsoft BASIC. The two most 
common Microsoft formatting functions, TAB and SFC, sre not 
present. There are several different approaches which may 
be wsed. For screen formatting, the POSITION statement is 
sufficient. A word can be placed anywhere on the screen 
Simply by specifying the X and Y coordinates. For spacine 
on the same line, 38s with the TAB function, the row 
specification remains the same and the column chanees. 


A second formatting device is the comma. A comms in 2 
FRINT statement causes the next printed statement to appear 
im the next print zone. This print zone defaults to 10 
spaces, but it can be changed with a POKE statement. If you 
PFOKE 201,X the mew print zone will be X spaces. However, 
the easiest way to imitate the TAB function im Atari BASIC 
is with 3 string of programmed cursor movements. Include 
this line im your program? 


10 DIM R$(80)3R$=" £80 cursor overs] _ 


To proaram cursor overs, type QUOTE, ESC, CTRL x, ESC, 
CTRL *, ESC CTRL XX, and so on. The cursor over will appear 
on the screen 32s 8 right-arrow character. When RS is 
printed, mo character will appear, but the cursor will move 
over 80 spaces. 


Whem you come to 3s PRINT TABCX)3 im your program, 
replace it with PRINT R$¢(1,X)3. This will print X mumber 
of spaces, just as the TAE or SPACE function would. Follow 
the statement with the word or variable to be printed, just 
as you would with the TAB or SFC statement. 


This method of formatting can be used on either screen 
or printer. The printer, however, does mot perform cursor 
movements, so R$ should consist of 80 blank spaces. If 
spaces are used om the screen, they will be printed over 
any characters which are already there, erasing them, 


Here is 38 sample program using this method of 
formatting on the printer? 


10 DIM A$(35)>,R$ (80) 

20 R=! iF 
a0 OPEN: $1.8:05°R%" 

40 AS="THIS LINE IS INDENTED BY 10 SPACES" 

JO PRINT #1; R$(1,10)3 AS 

60 CLOSE #1 


This program opens 2 file om the printer and prints to 
that file. This method is better than using the LFPRINT 
command, because of 3a limitation in LFPRINT which causes extra 
spaces to be printed where an LFRINT line ends with 2 
semi-colon. This problem can he avoided altogether hy opening a 
file to the printer and printing to that file, as shown 
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Date Files om Cassette 


There is 38 peculiarity of the cassette file handler 
which could cause problems if you gre mot aware of it. When 
a file is OPENed for output on the cassette, the motor and 
audio channels are turned om, and blank leader is written 
out to the tape. The motor will stay on and leader will 
continue to be written out until 3e 128 byte block of data 
is Output to the file with 3a FUT or FRINT # statement. If 
you attempt to turn off the motor by writing to FPACTL (POKE 
34018,60) then garbage will be written on the tape before 
it stops, leaving 3 had tape. The best solution to this 
problem is to write out s dummy record to the tape. The 
leneth of a cassette record is 128 bytes. Data is 
acenmulated in 3a buffer umtil it reaches this length. If 
you set a dummy variable equal to 128 spaces, and FRINT to 
the file, the motor will shut off correctly. It will then 
weit umtil the nmext 128 bytes have been sccumulated before 
turning on and dumping the data to the tape. Here is an 
example of this technique; 


10 DIM A$(128) 

20 POR Ist TO ize 

30 AS(LENCAS$) +195" " 
40 NEXT. I 

30 OPEN #1,8,0,"C3" 
60 FRINT #1; At 

70 PRINT #13; "DATA" 
80 CLOSE #1 


Remember, if you have written 3a dummy record, you must 
read this record back and throw it away when you INFUT your 
mata. 


Tf you have 128 bytes or more of dats which is to be 
written as soom as the OFEN statement is executed, it will 
be ummecessary to write out 3a dummy buffer. 


DATA SEFARATORS 


Whem writing data to 3 file with the PRINT # statement, each 
piece of dats must be separated from the mext, so that the INPUT # 
statement will know where one record ends and another begins. If 3 
separate PRINT statement is used for each variable or piece of data, 
then each record will sautomatically be separated by an End-of-Line 
character. This character, called am EOL, is ATASCI character 155, 
written CHR$(155). Am EOL is written to the tape or disk after each 
FRINT # statement, 


If you wish to put more then one variable or piece of data on 
the same line, you must supply your own separators. The separator 
(also called a delimiter?) will be an EOL for strings or string 
variables, or 2&2 quoted comma for mumbers or mumeric variables. In the 
following example, different combinations of variables sare shown, 
Notice that the FPRINT # statement itself is always followed by 3s 
semicolon, mever 2@ comma. If 32 comma were used following 3a PRINT # 
statement, 10 blank spaces would be written out to the tape, just as 
they would be to the screen. The example shows 2a cassette file, but 
the same PRINT and INFUT statements would be used for disk data 
files. 


open file for output? 10 OPEN #1,8,0,"C3" 
write string variables: 20 PRINT #1; A$;CHR$(155) ;B$3;CHRS(155)3C$ 
mumeric variables? 30 PRINT #13 A3s","383","3 
‘quoted strings: 40 PRINT #13 "CAT" 3CHRS$(155)3"DOG" 
mixed variables and 
constants: SO PRINT #1; AS3;CHR$(155)3283"","3B3CHRS$(155) 36s 
60 CLOSE #1 


Notice that when mixed variable types sre used, an EOL must 
separate a string from 38 mumeric variable, 


REM 
REM 
REM 
REM 
REM 
REM 
REM 
DIM 
10 REM 
11° REM 
12 REM 
13 OPE 
15 REM 
16 REM 
a7 REO 
18 REM 
20 FOR 


ONG Hb NP 


CASSETTE FILE DEMO 
BY FAM YOCUM, ATARI - 3/14/81 


THIS FROGRAM CREATES A SIMPLE CASSETTE FILE OF NAMES 
AND ADDRESSES. IT THEN READS THEM BACK IN AND OUTPUTS 


THEM TO THE DISPLAY AND FRINTER.L. 
B$(128) ,N$(20),A$(40),0%(40),ANS$(1) 

FIRST WE OPEN THE CASSETTE DECK FOR OUTFUT 
N #1,8,0,"C2" 


NEXT WE MUST SEND OUT A DUMMY RECORD. 
THIS WILL STOF THE RECORDER MOTOR 


I=1 TO 128 


30 PRINT #15". 73 
40 NEAT 


APR 
47 REM 
48 REM 
49 REM 


NT #1 


NOW TO GET THE DATA 


20 FRINT 

60 FRINT "INPUT NAME"; 

70 INFUT N& 

S0 FRINT "“INFUT STREET ADDRESS"; 

?0 INFUT AS 

LEG PRIN “INPUT CIlTy,Sr are” > 

110 INPUT CS 

132 REM 

113 REM SEND THE DATA TO THE CASSETTE DECK. 
114 REM THE MOTOR WILL TURN ON AS NEEDED, 


Li9. RE 
Lc FR 
i30- PR 


M 
INT #1;3N% 
INT #1;3A% 


140 PRINT #1;C% 


150 FRINT “INPUT Y/N FOR ADDITIONAL INFO"; 
160 INFUT ANSS$ 

170 IF ANS$="Y" THEN SO 

180 IF ANS#$<>"N" THEN 150 

182 REM 


183 REM THE “CLOSE’ COMMAND WILL WRITE OUT 
184 REM THE REMAINDER OF THE DATA 

185 REM 

190 CLOSE #1 

19% REM 

192 REM NOW WE CAN READ THE DATA EACK IN 


i9a RE 


M 


194 PRINT "REWIND RECORDER AND SET IT TO ‘’PLAY’" 
195 REM 

194 REM NOW OPEN THE RECORDER FOR INFUT 

L197 REM 

198 OPEN #1,4,0,"Cs" 

200 REM 


ZvVic Ren DELETE 


202 REM HAVE A FRINTER 
203 REM 


204 OF 


EN #2,8,0,"P3" 


205 TRAF 280 


206 RE 


M THIS GETS RID OF clTHE OUMMY RECORD 


207 INFUT #1,8% 


20S RE 


M NOW LET’S GET THE DATA 


LINES 204,262,254;266,268 IF YOU DON‘T 


290 


INFUT #1;5N% 

INFUT #13A% 

INFUT #1;30% 

REM DISFLAY THE DATA ON THE SCREEN 
FRINT N& 

FRINT AS 

FRINT CS 

REM THESE LINES PRINT ON THE PRINTER 
PRINT #2;N% 

FRINT #2;A% 

FRINT #2;C% 

PRINT #2 

GOTO 210 

CLOSE #1 

END 


Yeo PRINT SeRiNe "MONTH 4 f-1 2) COSEND 1 3 3 ENEO YT. ON 


x 8 
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LO MEM “OSE DR TRA! WEE 6-1 ee 

REM MAIN Laine. 

Dim AONTA$ CLS? .P TLE BC Le), SAME S CSO - DATES (CS: 
W120 BAARHICS 0 

PRINT “EBLRTHRAY FILE FROGRAM" 

200 REM DEFINE MONTH 

210 TRAP 205 
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24 LF acacd THEN FUL 

e280 SF MGNe 1 OR MOwSLS THEN 200 
44 GORUE 1L000+M0N 

270 FILE€¢i2. 4) en0NTHs 

S00 REM TRY YO OFEN FILE. 

310 TRAP Sag 

324 MOCE=8 

$80 OF FN #4,.4,.0,F DLE 

340 FRINT fF RINT “ELRTHOAYS I 
S40 TRAF 4006 

$44 THEUT €1,NAMES, DATES 

379 FRINT NAMES, DATES 

360 GOT Bao 


Mo'SMONTHS 


—e 


Sui KEM END OF CURRENT FILE 
410 CLOSE #1 
4.0 PAGE aS 


430 fs07G og 
1G: REM: MOSTH FILE NOT YET CREATED 
wiG. PRINT SPRING “NO BIRTHDAYS VEFINED FOR ““{ MONTHS 
eu MODE=8 
SoU BLUSe Bt 
odo REM ALLOW ADDING TO FOLE 
610 PRINT poten: "OQ YOU WISH TO ADD NEW DATA CY/NO' S SINFUT TOs 
O20 2 TOS ye Ea eu 
SOU OREM 4 i + Me IDE, ek CLES 
640 TOb]CHR BC LSS 3 
PRINT {PRINT -"LYrPE IN BAMES AND DATES" 
PRINT @ERINT “NAMES 2 TINPUT NAMEGI IF LENCNAMES 3 =0 THEN 700 
ef : & . ep tT BATE StAINeEUT DAEs 
‘ites Fj EN T $i NAMES TOSS OATES 
(TE Gea 
RE ENG OP aps 
CLOSE #4 
GOT 200 
hee END 
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1 REM XADEMD: OF ALTERNATIVE USE OF 

2REM . CODE 3 ¢P. 27-BASIC REF Mens 

3 REM . BY POM ‘YOCUM. ATARI, 10-22-cA 

4 REM 

18 DIM A$¢ 1000 >, BE 403 

i5 ag="" 

e PRIHT "SUSE SCREEH EDITOR KEYS To TYP 


lf PRINT "CHARACTERS ON SCREEM, SCATTER! 


18 PRINT “THEM AROUND, SOME CM EACH LINE 
.":PRINT :PRINT “HIT RETURN WHEM PESCY; 


19 INPUT BS 

28 OPEN #1.9,9,"E:" 

24 REM 

REM XXALLOW USER TO TYPE THINGS 
NPUT 84 


REM *XRESD pe ak LINE SY LINE 


78 POSITION ae 

74 REM 

vo REM SEPOLLONWIMG LINE RETURNS 

76 REM . EVERYTHING FROM CURRENT 

fe REM . CURSOR POSITIGN TO EHO oF 
fe REM . LIKE. 

INPUT #156 

REM 

REM <4CONCAT. TO As TO SME 

REM . ENTIRE SCREEH LIHE EY LINE 
98 ASCLENC AS "+1 3=8F 

95 AS LEM At +1 UCHR SC 15545: PEM COL 
189 HEXT ‘/ 

184 REM 

195 REM <*4PRINTIHG BACK THE ENTISE 
186 REM . SCREEN. AT THIS POINT. 

igf REM . COULD SAVE TO DEVICE, ETC. 
128 PRINT "SHIT RETURH TO OLSPLaAY SIREEH 


122 INPUT BS 

130 PRINT Ags 1, LEMC At 14; 

13S REM 

136 REM ¥4<¢BRESK> TO EXIT PROCESH 
146 GOTO "146 
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REM « BY -or aM YoCuM — Aiant  - 21/80 
DIM ACLOO) 


REM » READING NUMEER OF ITEMS TO BE 
REM « SORTED & DATA TO BE SORTED 
REM »« INTO AN ARRAY 

FE Mg AC CORE 2K 3 3 OOO OOK 
READ N 

FOR Bei TQ N 

READ X? ACE) =X 


ha ov T fe-t 


mi M 

REM . PRINTING - UNSORTED LIST 
PES Mg MOT NOK EKKO OO OK OK OK KOK 
PRINT UOUNGGRIED List" 

FOR ge) TO MM 

PRINT ACES 

MEAT & 

REM 

KEM: + THe SuAt 

REM 5 MOK KKHOK 


FeQ3REM xxFLAG#=1 IF NEEDS MORE SORTI 


POR Ceti. EO Ae 

LE AC Gt] poet) <TREN Ato 
TeACCISREM KX*¥XTEMPORARY REGISTER 
ACC =ACC+IL) 

mo (+ LT 

Foss 

MEXT C 

ZF Fai THEN 330 

Pt EM 

REM « PRENTING SORTED: LIST 
Pek M5) | KOK MCOKKK KK KOK MK KK KKK KKK 
FRONT 

PRINT “SORTED=LISE" 

FOR =. TO WN 

RRTNT ACE) 

NEAT E 

REM 

REM »« DATA ITEMS 

REM » MRK KKMMKX 

DATA Lo 

Rats 9, 15591054557 £20833:6 


END 


10 REM “ROCKSORT “ Whee 4-10-61 
109 RER MAIN LIKE 
Lia pork SORTE CSO) .,EUF OLD. TONE CSO? 
“HiCS US FOKE Se; 0 
tel To) 5 Shed ZS READ tithe TI TAUNECT+1>0=TINEXT TT 

4 i} TNFUT SOR 4 
BU LASTS=LEN CSOR T$) 

GRAPHICS 2 
te LEA t- SORTS 
1860 POKE: 7323: 

POKE LS,U023F0KE L?,03F0KE 20,0 
20 G-FOR-LSALASI“1i TO: & Sler 2 
208 SOUND O, TONE CTI, 10,10 
2l0 Ke) 
220 FOR. desi TB. 21 
2295 SOUND 1, TONE CJ)2,10,8 
2a EF SORTS Cd, J) SORTS (U1, U1) THEN EUFS=SORT&(U,J2SORTE( UO, J2=SORTHCJt1,Jt135 
SORTS Cdl, JtL sBur és k=: 
a%0 FOSITION oO. 
2a0 FR oe #5? SORTS 
2&0 NEA ul 
3a) ioe THEN T=1 


270 SOUND 1,0,0,0 

300 FOR L=29 TO 0 STEP -1L?iSOUND 0,2,10,103NEXT Tf 

310 GOSUE FOU 

320 FRINT “ELAPSED TIME "SHHS "I'S MMS US 3Ss3 

sod END 

10600 DATA 29,31.33,35,37,40,42,45,47,50,53;57 ,60,694,68,72;,762:681 
ei ta ei sis 128,136,144,1353 

Laid SATs 1625 £7 ’3,182 5 L93,204, dee CLP eisweeoue Ga 22432243 
900 REM ’TIME.SUE’ Wee 3-12-81 

S902 REM RETRIEVES REA. TIME Ao OLR 

2904 REM CQOUT-HH.MM,SS) 

S906 SS=(FPEEK CIB KZ56K2546+F EEK CLS) KSS4+P EER (2090/00 
$908 HH=INT(SS/ (40x60) ) 

791G. SS SS MEK OO RG U 

SPL2 MMHINTOSS/h0) 

Sot 4 SS<INTSS- “MMS OD 

S914 RETURN 


G5,91.75,102,106 


bed 


Ai 


186 REM . 
M85 REM . 


ibis REN 


idee REN . 
1638 REN. 
ibd 3 REM . 


1856 REN 


1060 REM . 
1070 REM 
1029 REM. 
1929 REM 
1108 REM 
1113 REM . 
1120 REM . 
1139 REM 
1135 REM 
1136 REM 


1140 REM 


1136 REM . 


Lied REM 


PROGRAM ETCH-A-SEETCH 
BY Fat VYOCUM, 94-58 


THIS PROGRAM SIMULATES 4H 


ETIH-A-SKETCH USING A JO'Y- 
STICK TO ORAM THE LIME 


USRIABLES 
5&8 ie 234 
MSTERC O. ARRAY FOR K-AkKIS 
a 


VSTEPC 3. .GRRAY FOR Y-AATS 


IMCEEMENT S 


Ral. we eT 
Lie IHDES UGRTHELES 
Og re VALLE RETURNED 


BY STICEC Ss 
Set ee COMBIT TONS 


dededededendendectecle tedeede dendentede fords ede de donde bey 
PETER REED ELE EE SEH EE HE OEE! 


1i73 OL} ue STERC = As YSTERC 2a 
1198 SETCOLOR 4.2.6 


113% COLOR i 


120) GRAPHICS (+i 3 


{210 M=L6Q:REM SkASTARTING & 
1223 Y=91:REM tek 


i228 REN 


1240 REM . 
125% REM . 


izso Rel . 


1260 REN . 


1278 WSTEPC 5 = 
1208 “STEPCS 
1258 HSTEFC 7 


- LOPATION 
STRRT IMG LOCATION 


SETTING UF aeRay'S FOR BE 6 Y 
IMCRENENTS . SLESCRIFTS REFER 


TO Ars TICK peas tS 
be ederherderherdonizes Fe He's drsdpodoede-Aeeds 
meee ae ee a x ee 3 eae wpe gee eat 


STEP S 31 
= I 'STEPC 5 I=] 
SYSTERC 7: ed 


1388 SSTEPC 9 =-1. YSTEPC 33s 
1318 *STEPC ig o=-1: oSTEPC 13 9 as. 


{320 STERC 


tite-1:YSTEPC Li =a 


1239 STEP 13 3=8: STEP: 13 351 
1349 MSTERC 14 <0: STEP 14 3-1 
1358 MSTEPC 1S =a: V'STEP: 15 158 


1335 REM 


1356 REM . 
igor Rel. 


TO TURN WARNING BEEP OFF 


* + eS bp ede ode e ty 
RES weeseers PRE REE RAS 


1368 SOUND 8.4.4.8 


1361 FEM 

1363 FEM . TESTING TRIGGER BUTTS: IF 
1364 REM . BUTTOH FUSHED ERSSES SCPEEM 
1365 REM . TO START OVER. 

ig66 REM FESTEAOCESCERERES SOL EEES OSS 
i3re IF STRIGC Ws THEH Lich 

1388 S=STICKCB: 

1338 REM 

1484 REM . DETERMINING THCRENENTS FOR X 
i410 REN . & Y AHO PLOTTING MEW FOLNTS 
1420 REN | KXEYKE SERRE RY oo 
14.358 KEK+KSTEPC S &: fab Sa ‘'STEFC 5 

1448 TRAP 1600:REH SS4CHECK THe OUT OF 
i456 FEN . BOLNDS ERROR 
i468 FLOT K.'/ 

1478 GOTO 1376 

idsy REM 

1450 REM . THE FOLLOWING LIMES ARE 

1546 REM . EXECUTED IF TR’ TO MOWE GUT 
i518 REM © BOUNDS WHEN DRAWING OH THE 
1526 REM . SCREEN. THE LAST POINT [5 
i538 REN | MOUED SACK IN BOUMOS AWB THE 
1545 REM . WARMING SiJUND IS ACTIVATED. 
1558 REM . THE FOR-HEXT LOOPS ARE USED 
1Seu REM . 70 CETERM INE LENMs1o OF ARR 
1S? REM ; I}4is BEEF 33 Seo CB oS aT 
i556 REM . TO FSGe Is iMTehS t a 

1538 REN | CREEK we EERO RE ED Lolelede ire 
toby eH-NSTERC So: {=i- CeTEECS 

tec FOR I=15 TO @ STEP -i 

{636 FOR J=i 706 

1635 MEXT J 

1644 SOUND 8.136, 18.1 

1658 NEXT I 

1668 COTS 136e 

1678 END 


1B REM. 
BOS REM. 


igi’ REN 


1B28 REM . 
1936 REM . 
i846 REM . 
1845 REN . 


iBS@ REM 


ive REM . 
i878 REM . 

1858 REM . 
1320 REM. 
1168 REM . 
1110 REM . 
1128 REM . 
1136 REM . 
1148 REM . 
1330 eeM 


i166 REM 


1178 REM . 
1158 REM . 
1158 DIM ASTEPC ces, 4 


PROGRAM MOUE-A-EG 
BY FAM YOCUM. 9-S-c8 


THIS PROGRAM MOGIFIES THE 
ETCH-G-SKETCH PROGRAM 50 
THAT TRE Jy STICK IS USED 
TG MOVE AROUND A BOX 


UAR I ABLES 
SR he * 
SSTEPC ). ARRAY FOR ¥-ANIE 


IMCREMENHTS 
YSTEPC 3. ARR FOR ‘Y-AXIS 
fe fe ee HTS 


bik ce & & Y COORDIT 
iad. INDEX LAR TBELES 
Sr. VALUE RETURNED 


BY STICK(A) 
SET UP INITIAL CONDITIONS 


Serberkecbackeedecdscdrcioes Tad Sad ao ebrndoodes Sed 
RRA R RR onan SO EO Bb aE E EEN 


STEP 2's 


123 SETCOLOR 9.2.3 


1218 COLOR 1 
223 GRAPHICS 
1238 K=86:REM 3 
12446 ‘Y=43: REM of 


1238 REN 


ise REN . 
12°76 REM . 
lZ7a Wer. 
1230 REM . 
1258 ASTEPC 3 1: 


Ce+i6) 
SRS TART THs & LOCAT TOM 
CESTARTIMG ‘Y LODAT ISH 


SETTING UP ARRaYS FOR KH & 7 


IMCREMENTS. SUBS ORTP'S 
REFER Ti) JVETICR PS! 7 TOMS 


“des fpeSselpedssde “dee pede pers eee eann Perce 
x, st od aS o%e oe ofos'ys “4 “S age oye 


“oaiteahe nee: wee ae 


‘STERCS =I 


1368 ASTER 5 O=1: WSTERC 5 5 1=-) 
1318 “STEPC 7 1 : TOTERC ¢ ¢ =e 


1328 ASTEPC 2 s-1:! 


YSTerE SD =] 


1338 “STEPC id l= ~4 YSTERC iM os-f 
1348 STEPS Ee YSTERC Li ose 


13358 ASTEFS 1 


13 s6: 7STEPC Lace 


1368 ASTEPC 14 =a: ‘/STERS id =-1 
1378 RSTERC 3 =e: TSTEPC 135 J=n 
i3°S GOTO iSew 


{380 REM 


139% REM . 
i4uB REM . 


TO Ti sae ee BEEF valle 


ee ree ee leeds rSeederde Seeborderberderts tobe. 


4 -,. oe onde a ~~ % roe ogee ba oe 


i418 SOUND 8.8, 5.8. 


i942 FEN 


1438 REM 
1449 REM 
1468 REM 


STRIC ee THER ce et 


i¢ff IF 


TESTIHMG TRIGGER EUTTOM. IF 
BUT IC she Pid ae ee OEE ER 


dee “he 3% & ord +9 oo 
Fe a3 os 25 


ee 
es ne ec a 
ste we we 


14a S=STICKES S 


i4s2 REM. FOLLOWING Csutes & Pee 20 


i434 REM 2 EDA 27a OF SCREEN WHILE 
idse6 REN . WAITING TH MOE LT 
idsc REM EEE RENE ERE CREE EN ERY 


i4o4 IF S=15 “THEN 1470 

156 REM . ERHSIMG 60% BY SETTING COLOR 
15i8 REM . TO SSCEGRO COLOR ai DRSWIMG 
1S28 REM . BOY IN EACKSRESLED ee Re 

iS2S REM . THEN SET Bailie. Ti ote SALOR 
1538 REM | OREXESESERAA EES, ree FRRAEAS 
1548 COLOR @:REM <SETRY ree ‘ WT THIS 
iS44 FEM . LIME ANE: LIHE teat 
i545 REM . TO SEE HON BOe TS 
i546 REM . MOT ERSSED. 

1556 GOSUB 1990:REMN <54TO DRAW ECS 

1558 COLOR 1} 

1534 REM 

1668 REM . DETERMINING [MCREMENTS FOR : 
1618 REM . & YY AND PLOTTING MEW POT 7s 
i612 REM . MULTIPLIES & ey 5 Ta SPEED LP 
i614 REM . HOUEMENT GF cee 

1616 REM SAXKEAREE EER ER ERE CR Race 
tech Web gs STEF* 5 AR VSV4 STEP 5 k5 

1634 TRAP 187: REN S235CHECKIMG GUT oF 
i643 REM . BOUNDS ERRGR 
te5e@ PLOT %.17 

1668 GOSUB 1996:REN S2kT0 DRAM BOM 


1678 
1r6e 
1776 
fou 
1738 
ice 
1318 
ee ea 


1328 
1368 
1318 
1324 
13:38 
1340 
1238 


28.33 


GOTO i149 


REM . 
REM 
REM . 
REM . 
REM 
REM . 
REM 


YeM-NSTEPCS £5) STERC 30s 


THE Fo 3 OWTHYS 23 LTHES ARE 


. EXECUTED TF TRY TO MOVE DUT 


BRHDS HEH Urreli Mig UM THE 
SCREEN. THE LAST POINT Is 


. MOUED SACK IH FOUND SS GHD THE 


WARMING SOUMD TS ACTIVATED. 


° THE Fo pm RIE’ #3 Lanes Ro Sten 
. TO DETERMINE LEMGTH OF LARH- 
IMG BEEP cJ> Geo CSiises IT 
=e PRUE Y 


i t f>7 TY a, ae 
4 INTs ieee 
Pee: = y 
oo ot OM 


sheedes = “heele * 5-8 
rete eee aed 


= 
= 


GRAFHICS ¢ Sey COLOR i 


FOR I= 


{5 10.9 STEP - 


FOR J=1 TO 3 
HEAT J 


SOUND 


MEAT | 


8,136, ia 1 


GUTS 1638 


STOP 
REM 

REM . 
REM. 


DR AMT IO 


SUBROUTINE FOR Coen ESA 
RARER REE RARER ES REE RRR AE RR ate 


“+18, '7 1 


ORAWTS 41g, v+19 


CRAWTO 


Mo tik 


GRANT 4.7 


RETURN 


284H EHO 


| 


108 REM THIS DEMO SHOWS HOW TO USE 
191 REM LOWER CASE IN GR. 1 

162 REM WITHOUT FILLING THE SCREEN 
162 REM WITH HEARTS. 

184 REM THE OATA IS TAKEN FROM THE 
165 REM CHARTS ON P S5-56 OF 

166 REM THE BASIC REFERENCE MANUSL 
110 REM scone 
206 GRAPHICS 1:N=t 

285 POKE 755,226: SETCOLOR 4.4.4 
219 READ X:1F X=999 THEN IalT0 sm | 
215 HaH+i 

226 COLOR “+64:PLOT LN: ORAWTO NH 
238 GOTO 218 


246% DATA 42.53. 36,597.59, 24.47.59. 23, 


eg Be , 388 GOTO 208 


og 


1, So 
a Fae! Ca 


18 FEM NO MORE HESRTS 
11 REM IN LOWER CASE, GRAPHIC 1 


™, 
i.-9 
- ee 


: sderderdertectocdooderbechoobooleeipehredsobpoiresesdeciochorsseboodesssrespossesy 
{ 2 F Et x 5 3 ey" “ue o's ay i -~ aA aoe! Ne 4%. “N ayes Se So oye oe aay Go as aye te “% o%o 


iS IF FRECG 466% THEN. EHD 
2B RANTOPSPEEKS tes 2 

25 POKE 186. PHMTOP-is 

36 GRAPHICS 1 


49 CHBAS=RANTOP-4 : AODR=SCHEASA S56 


56 FOR I= TO 1he3 

68 POKE sOOS+1. PEEKS Sfidde] 3 
79 HEXT I 

PA CHOR=e4 : POCH=BODR +e THbo 
99 DATA §.8.48.4,5,5,5.8 

166 FOR ¥=6 TH 7 

114 READ 4 

126 POKE ¢FPOS+K 1,4 

134 HEAT 


LD FE re eee ee eee. 
168 REM USE THIS ROUTINE Th 

176 REM INITIALICE ‘OUR PRPC 

180 REM CALL LOWER CASE WITH 

194 PEM POKE fhe. CHEAS+S 

195 REM Coe ited tee tte bete onde 


264 POKE 7Se, CREA +2 

218 POSITION 5.5 

226 PRINT #6: "LOWER Case" 

238 POSITION 3.3 

249 PRINT #6: "WITHOUT HESETS" 


ee /\|\ : inter-office memo 
~ ATARI 


~ 


DATE: 9/26/80 


SUBJECT: Mode 0 Characters in Graphics Mode 8 _ 


This example will show how to display text using the standard 128 character 
set on a graphics mode 8 screen. The characters may be positioned horizon- 
tally in the standard 40 columns of mode 0. The vertical position however 
may be on any of the 192 mode 8 lines. 


To define the position of the cHaracter on the screen set the variable X 
to the horizontal position (0-39), and set Y to the vertical position 
(0-191). Use the example to output characters. 


10 DIM A$(4),0S(1)__. # 
20 AS="TEST" % 
30 X=15:Y=80 
oomsace 40 GRAPHICS 8 
Be 50 L1=PEEK(88)+PEEK (89) *256 

60 12=11+Y*40+X 

70 FOR Z=l1 TO LEN(AS) 

80 0$=A$(Z,Z) 

90 GOSUB 200 

100 3=573444+X*8 
110 FOR U=0 TO 7- ie 
120 POKE 12+U*40, PEEK(I3+0) 

130 NEXT U 

140 I2=I2+1 

150 NEXT Z 

160 STOP 

200 X=ASC(0$) 
210 IF X>127 THEN X=X-128 
220 IF X>3l1 AND X<96 THEN X=X-32:RETURN 
230 IF X<32 THEN X=X+64 
240 RETURN 


aT: 


© A Warmer Communications Company 


sD 


~ REM FILL IN A SHAFE 

6 REM BY LANE WINNER 4/781 

10 GRAPHICS 7+16:COLOR 1:DEG 
20 GOSUE SOOSFLOT X,Y 

30 FOR T=0 TO 360 STEP 64 

40 GOSUE SO0SDRAWTO X,Y 

90 NEXT T z= 

80 X=793Y=47 


FILL=1000:TRAF 2000 

GOSUE FILL 

GOTO 300 | 
Y=30xCOS(T)+47+10KCOS(Tx2) 
X=30KSIN(CT)+79+10KSIN(TXKS3) 
RETURN 


FLOT X,Y 

X=X-1LSLOCATE X,Y,Z 

IF Z=0 THEN GOSUB FILL 
X=X+1 

Y=Y-1$LOCATE X,Y,Z 

IF Z=0 THEN GOSUB FILL 
Ya¥+i 0 — 


_ X=X+1sLOCATE X,Y,Z 


IF Z=0 THEN GOSUB FILL 
X=K-1 

Y=Y+1L3LOCATE X,Y,Z 

IF Z=0 THEN GOSUEB FILL 
Y=¥~-1 

RETURN 


TRAP 2000:GOTO FPEEK(186)+PEEK (187) «256+20 


\ 


Ci es pend The ive W Graphics Operating Desktops for the 8-Bit Atari: 


‘DIAMOND OS ST jr 


(by Alan Reeve of REEVE Software, distributed by USA Media) 


and ‘GOE (Graphs Operating Environment) 


(by David R. Sullivan of Total Control Systems) 


Reviewed by Penny Ormston, R- Atari Club 


CONFUSION 


Ok, right off there are probably a 
few people reading this who are scratch- 
ing their heads over the above informa- 
tion. “What?", they are seooay think- 
ing. “Aren't the and the GOE the 
same program?” The answer is NO! 
Understandably there is a lot of confusion 
going on about these two similar pro- 
ducts. Not only are they similar in 
appearance and in what they do, but 
apparantly even the magazines are hav- 
ing difficulty in telling them apart. In the 
October 1988 issue of Analog, for exam- 
ple, there is quite a write up of the GOE 
ST jt available from Merrill Ward (now 
known as USA Media). This write up 
really threw me for a loop, because when 
I attended the Atari Faire in Glendale, 
CA in mid September, I saw BOTH the 
STjr and the GOE — at two seperate 
booths, and quite obviously... NOT one 
and the same product! 


Part of the confusion lies in the fact 
that USA Media's press release for the 
ST jt has several tefrences to itself as 
being a GOE or Graphic Operating 
Environment. In fact, the press release 
contains so many names, it is difficult to 
tell which one is actually the name of 
their product other than STjr. They 
alternately call it “St. Jr. Graphics 
Operating Environment”, “Gra hic 
Operating Environment ST. ap ia- 
mond GOE ST. Jr.”, and simply “ST. Jr.”. 
No wonder the Analog writer didn’t get 
it straight, the USA Media people can't 
seem to figure out what it is called either! 
The outside of the box calls it the 


Diamond OS STjr, and for here on out — 


when I refer to it I will simply call it 
“ST jr". (whewl) The STjr has been 
released in disk form for the price of 
$29.95. A cartrige version is in the works 
and has not been released yet, but is 
expected to cost $49.95, 


In the meantime, GOE, which is 
written by David R. Sullivan and distri- 
buted by Total Control Systems, has only 
been teleased in its DEMO form. The 
actual cartrige has not been released yet. 
The GOE cartrige costs $50.00. The GOE 
demo is made readily available to all 
interested persons and users groups free of 
charge, so you can get & look at it before 
you buy. I certainly wish more companies 


would do this, I really think it would curb 
a lot of pirating if people were able to get 
a free peek at what's available and decide 


from that whether they want to buy or 
not. 


Another reason for the apparant 
confusion between the GOE and the ST jr 
stems from the fact that David Sullivan 
(GOE) used to work for USA Media 
(ST jr). According to Mr. Sullivan, in his 
“Special Notice” text file on the GOE- 
demo disk, at one point Total Control 
Systems and Merrill Ward and Assoc. 
were working on an agreement to publish 
GOE. The press telease was made before 
an agreement could be reached. Mr. 
Sullivan goes on to make some rather 
strong allegations against Merrill Ward 
and Assoc., now known as USA Media, 
including the following: 


“Merrill Ward & Assoc. now under 
the name of USA Media is associated 
with another product. The product that 
they currently sell is NOT GOE. 
Although it has been advertised as such. 
They persist to use GOE, Graphics 
Operating Environment in such a way to 
mislead you, the public, into believing 
that their product is GOE. It is not, Total 
Control Systems is the ONLY publisher 
of GOE at the present time.” 


Later in the same text file, David 
Sullivan makes this statement: “I can 
only stress to the Public, PLEASE USE 
EXTREME CAUTION when treading 


press from these people now or in the 
future.” 


In speaking to Mr. Sullivan on the 
phone, I can really feel the animosity he 
feels toward USA Media. He feels that 
they are not above stealing his code, and 
he stipulates in his demo's text files that 
he does not want a copy of it to slip into 
the hands of Shelly Merrill. He also stated 
that he does NOT feel this way about 
Alan Reeve, the writer of ST jr. 


I have tried to teach both Alan 
Reeve and Shelly Merrill to ask questions 
about the STjr and even about David 
Sullivan’s accusations, but have not been 
able to reach either of them at this time. 
This is particularly irritating because it 
costs me money to try to call, plus I can't 
get any answers to my questions about 
the ST jr. I think it is very important for 


usets to be able to contact the software 
publishers when they have problems or 
questions. We need the support even 
after we have spent our money on the | 
products. Apparently Mr. Merrill is in the 
erie of moving, and that is the reason 
was unable to reach him. I can 
understand that situation. But it took two 
phone calls just to find out that much, 


and my questions have remained unans- 
wered. 


I hope this clears up a little of the 
confusion about these two prqducts in- 
stead of adding to it. Obviously we have 
two highly competitive products here, 
now I will try to sort out the strengths 
and weaknesses of both products. Please 
note, that I only have a free demo of the 
GOE to go on, not the actual cartrigel | 
ordered one at the Atari Faire, but at the 
time of this writing it has not been 
teleased. The ST jr that sits in front of me 


-is the $29.95 disk version. This may seem 


like an unfair comparison, made between 
a demo and a full-fledged product, but ! 
think it is important to set the record 
straight about these products. When the 
cartrige versions of these two products 
are released, they will be re-teviewed in 
depth. For now, this is just an overview! 
compatison. 


WHAT IS A DESKTOP? 


‘ST users ate well aquainted with 
desktop programs, such as GEM, but for 
most of us who are strictly 8 bitters the 
concept may be a little vague. 


What is a Desktop? Well, to put it 
as simply as possible, it is a graphic Disk 
Utility Package similar to what you 
normally use with DOS. The difference is 
that the Desktop uses icons (pictures) 
instead of words, and you can use the 
joystick, mouse, or keyboard arrow keys 
to make your selections. This is supposed 
to make it easier, because you do not 
have to memorize commands such as A, 
Dit, Format, I, etc. to check a directory, 
format a disk, ot whatever. Both the 
GOE and the ST jr can use all three input 
devices. Both look much nicer that a 
typical DOS screen. 


Is that all that either of these 
products is, a graphic DOS? NO! Not at 
all. Both the GOE and STjr have 
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itional support program in the works, 
ord processors, paint programs, and 
ore. All supporting the same Graphic 


\vironment as the parent product. Now 
the comparisions: 


\PPEARANCE: 


Both the STjs and the GOE are 
milar in appearance. The ST jr shows a 
reen scteen with a file icon and trashcan 
on on the left side of the screen, and 
yur menu words across the top of the 
sreen: Desk File Disk Options. If the 
ystem is booted with more than one 
tive online, there is still only one file 
son shown. If the file icon is selected, 
ou can “double click” to open the file 
the icon drawer opens to show you have 
iccessed the drive). Now you can check 
he files on the disk or whatever. 


GOE shows a gteen screen with two 
jisk icons (labeled “A” and “B”) and a 
itashcan icon. It shows two disk icons no 
matter how many drives are present at 
logon. The GOE has four menu words 


across the top of the screen also: Desk 
File View Option. 


INPUT DEVICES 


Both the STj and GOE allow the 
use of a joystick, mouse, or the keyboard 
for input. One convience of the ST jr over 
the GOE is being able to use the arrow 
keys to move the cursor without having 
to hold the control key as well. However, 
the GOE allows keyboard input for 
information as well as cursor movement, 
so it seems necessary to have the 
control-arrow combination for movement. 
Still, it would be nice if there were an 
option to select keyboard movement 
using arrow keys alone or with control 
for different uses. 


DOS COMPATIBILITY 


The ST} 


is compatible only with 
Atari Dos 2 


. The XEvetsion, demoed on 
the flip side of the disk, is used with 
DOSXE or Sparta dos X. The upcoming 
cartrige version will also be compatible 
with Dos 2.5. 


The GOE demo is compatible with 
Sparta dos 3.2 and Sparta dos X. A few 
of the demo functions (such as print to 
the screen) do not work properly with 
Sparta Dos X in this demo version. | 
talked to Mr. Sullivan about this, and he 
said it was because Sparta Dos X had not 
been released yet when he made the 
demo disk. Since Sparta Dos X was first 
teleased at the Glendale Arati Faire, | 
have no doubt that that was exactly the 
case. The cartrige version will be compat- 
ible with Atari dos 2.0, 2.5, Mydos, 
Smartdos, and Ados as well as the Sparta 
dos versions. 


ULt AVIV vy 


OPTIONS 
ST jr: 


The four words at the top of the 
ST jr screen: Desk File Disk and Options, 
ase drop down menus to allow you to set 
up or use the desktop. Moving the arrow 
up to any of these words will make a 
menu drop down. Selecting Desk, you 
will see the option “info”. If the arrow is 
moved to the word info, the word is 
hilighted. You may now select this, or 
move off of tae menu anc do something 
else. Selecting info will display a title 
screen, informing you that this is the 
Diamond OS STjt, etc. Select cancel to 
do something else. 


The file option menu for STjr in- 
cludes the following options: Open, Sta- 
tus, Duplicate, New Folder, Close, Quit. 
Unless the file is open, you can’t use any 
of these options except Quit. The option 
to duplicate is used to copy a file. New 
Folder is used for subdirectories. Since the 
regular disk version is only compatible 
with Atari dos 2.0, this seems like a 
useless option. Status, | assume, is to 
show the status of the file.locked, 
unlocked, deleted? I really don’t know. | 
have never been able to get this function 
to work. This is one point | wanted to 
discuss with either Shelly Merril or Alan 
Reeve, but as | stated before I could not 
get ahold of either of them. Close closes a 
file drawer that has been opened. 


The Disk option menu has es two 
choices: Format and Duplicate. These 
options are obvious. 


The Option menu has the following 
choices: Display, Confitm, Install, Save- 
Desktop. I assume these options are 
available to set up the desktop exactly 
the way you want it, then save your 
configuration to disk for future use. 1 was 
unable to use this. No matter what | did, 
I just couldn't click on any of the options 
except the ones that were already mar- 
ked. I don’t know..pethaps my disk is 
bad. But I was unable to get ahold of 
anyone to confirm this. The thought that 
came to my mind though, is that if I have 
difficulty making this software work, 
what is a new user going to do? 


GOE: 


The first of GOE’s four options is 
Desk. Just as in the ST jr, GOE’s options, 
when selected, product a drop-down 
menu. The Desk menu has these options: 
Desktop Info, Control Panel, Calculator. 
The Desktop Info will display a title 
screen letting you know that this is the 
GOE by David R. Sullivan, and other 
pertinent information. Just as in the ST jr, 
you click Cancel when you are through 
looking at the screen so you can get back 
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to working. Selecting the Control panel 
will show you some marvelous wonders! 
Unlike the STjr, GOE gives you full 
control over your desktop. So, you don't 
like the green screen? You can change it 
to red, black, or whitel Does the arrow 
move too quickly ot slowly for you? You - 
can select the arrow speed for all three 
input devices tight hete in the control 
panel. 


Don't have an R time cartridge? No 
problem. With the Control] Panel you can 
select the time and date yourself. There is 
an option to change the font density to 
either 40 ot 64 columns. There are other 
options here as well, but they are either 
deactivated in the demo, or | just can’t 
figure out what they are for. 


My only complaint about the control 
panel is that once you make a selection 
the panel disappears. If you want to 
make any other changes, you must select 
Desk from the top of the screen again, 
then go to Control Panel again. It would 
be so much easier if control would remain 
with the control panel until yous select 
“cancel” to get back to the main selec- 
tions. The final option on GOE’s desk 
menu is a calculator. The calculator looks 
just like a little calculator. You can either 
use the pointer or the keyboard to input 
numerals, but the pointer must be used to 
select operands. The calculator is simple, 
with no special features, but still it is an 


attractive, well designed addition to the 
package. 


The file option menu is next in line. 
Here we have the options: info on disk, 
New folder (subdirectory), Add drive, 
Save Desktop, Print Screen, Format Disk. 
Most of these options are vety Basic. 
Most are also disabled for the demo. The 
Print Screen option is strange..why 
would you want to print the screen? | 
suppose it is like a file dump and the 
option will be more useful with future 
additions to the GOE line. 


The next is the View menu. This has 
the following offerings: Icons, Text, Sort 
by Name, Sort by Type. Using this you 
can look at your disk files using either 
Icons or tegulat text filenames. Using 
icons looks fancier, but the text seems 
more practical to me. No matter which 
you choose, you can read or load any file 
by selecting it after selecting the disk 
icon. The sorting is done by name or 
type, and affects the order in which the 
files are shown. To see the files, move the 
pointer-arow over to a disk icon and 
give a “double click”. If you select drive 
B and you only have drive A online, then 
you will see the contents of drive A. 


Lastly comes the Option menu. This 
has the following choices: Execute Dos, 
Atan BASIC, TOP Cartrige, Missile Com- 
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and, Reboot System. Missile command is only available 
n the XEGS. The Atari BASIC and TOP Cartrige 
ommands ate disabled on the demo, but both should be 
*lf explainatory. That leaves us with the two remaining 
ptions of Execute Dos and Reboot System. I guess we 
ll know what those options do also, although my son 


vanted to know why anyone would ever want to kill 
0S. (Ahem...) 


DOCUMENT ATION 


ST jr's documentation is very simple. There just isn't 
much there. About 20 pages, and nearly half of that is 
discussion of future Diamond products. The documen- 
tation talks much more about what it is, and what it can 
do, and will do in the future, but says very little about 
how to do it. Clear documentation would have been a 


big plus. Instead, there were several functions | just 
couldn't use or figure out. 


The GOE demo has a lot of documentation on the 
disk. There are six text files on the disk, but only one 
really explains the use of the GOE demo. This is very 
basic. Simple and easy to understand. There is one thing 
that bothered me about it though. Every single page of 
the text files had several typographical errors orf 
misspellings. I realize that this is only a demo disk, and 
not the finished product, but seeing so many typos leads 
me to believe that the person who did this is just 
throwing it together without taking the time to do it 


tight. If he is sloppy here, maybe he was sloppy with his 
code? 


FUTURE PRODUCTS 


Both the ST jt and the GOE have support programs 
“in the works” including word processors and paint 
programs. There are sample paint programs on both disks, 
but they are only demos and are not functional. | believe 


that BOTH of these products will be fully supported by 
their authors. 


SOME CONCLUSIONS 


There are many features of both products that | 
have only touched upon here. As I said before, when the 
cartrige versions are released, both products will be 
reviewed again in much greater depth. 


Many of the features of GOE are not supported in 
the demo. This demo is meant to give prospective buyers 
a look at what is available to them. The final GOE will 


be user programmable, with full complete (and carefully 
edited) documentation. 


On the other hand, ST jr will also release a cartrige 
soon. But the ST jr diskette, which sells for $29.95 is not 
advertised as being a demo of the upcoming cartrige. If 


you want to upgrade to the cartrige, you are still out the 
$29.95 that it cost for the disk. 


Personally, I think the free GOE demo is _ nicer, 
works better, and does more than the STjr. It is also 
easier to use, and its author is available to answer 


questians if you have any problems. These are all BIG 


PLUSES. It is not perfect, but | have seen enough to 
believe that Mr. Sullivan will fulfill all my expectations 


for the GOE cartrige. Unfortunately, | cannot say the 
same about the Diamond ST jr. 


PSAN_ Product Review - Diamond OS STjr and GOE. (8-Bit) 


DISK DIRECTORY 
SALVAGE 


Aa 8-Bit “U-Fix-it'7 
By Bob Prince 
(Reprinted from the NACEC Newsletter 6/88, via ACCOC 10/88) 


While cleaning up some files the other day, | had a dreaded 
experience. A directory call from DOS produced the feared message 
“ERROR 144”. What was on that disk? I didn’t know! All I knew 
was that it was a full double density disk of documentation files. 
So I booted up my trusty disk utility DISKWIZ 2 (vintage ;1982 
from Jerry Allen). Many other sector editors ate available to let you 
look at the contents of a disk and change anything you like. 


What I found confirmed my worst fears - two bad sectors, 


sector 361 and 362. Unless you know something about Atatri file 
structure, the significance of this is not obvious. 


After all, what's the big deal about losing two sectors of text? 
Well what that means in this case is that the first two sectors of 
the DIRECTORY were lost. Short of programming to read the ‘disk 
contents into a series of files and editing them into meaningful 
files, the whole disk was useless. (Not quite, since | did manage to 
copy five files, but you get my point). 


Back to DISK WIZ 2. I mapped the disk and found 26 files on it 
- all consecutive. Then I went to the first sector of each file and 
read it to see the name of it. Between what I was able to salvage 
from my disk, what I had in backups and what I found posted on 
local BBs’s I could replace about half of them. That still left 99K 
bytes of information lost. I decided to try to salvage it. I checked 
the file links and was relieved to learn they were intact. 


I reasoned that all | had to do was reconstruct an acceptable 


directory so DOS could find the start of each file and then copy 
file by file to another disk. 


I guess it’s time to have a brief discussion on how DOS 
manages files. The directory is contained on sectors 361 - 368. 
That's 8 sectors. Each directory sector has 128 bytes and each file 
takes 16 bytes to record all necessary information: 


INFORMATION. ' BYTE(S) 
FILE STATUS.......-cc.cccesccsecoee aaa, 
FILE LENGTH (sectors) ...........0....2,3 
FILE START SECTOR.............. ke 


»-. 4,6 
FILENAME. .......cccccosscovccsserseseveccee om IG 
EXTENSION........ccccccsssossersseesees 14-16 


That allows 8 files per directory sector times 8 directory sectors 
for a maximum of 64 files per disk. For your information, all data is 
shown in hexidecimal (ugh!) and byte pairs are always in low byte 
~ high byte order (for example decimal 525 equals hex 020D, but 
would be entered OD 02). File status could be never used (00), 
normal (42), locked (62), deleted (80), or open (43 or 63). 


Next I decided to enter the information from my map and 
manual file scan in the order and format described above. One 
reason I chose DISK WIZ 2 for this job is that it has some handy 
features such as a dec-hex conversion, a directory screen print and 
a graphic screen dump compatible with my printer (Gemini 10X). 
The formatted directory proved very useful in checking my editing, 
and before long I had sucessfullly completed my disk surgery..and 
learned quite a bit about file structure in the process. 
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STANDARD ATARI DISKETTE FORMAT faée 


Bavce Qarta ocr oS 
AND IN THE BEGINNING 


This is a re-write of the handout passed out at the September Sth general meeting. 
I have restructured it somewhat, plus filled some gaps and corrected a few errors. 
This is a better reference document than the handout, and so I would suggest you 
throw out the handout, and keep this instead. If there is much interest in DOS 3 
disks, let me know, and I will do a little research. 


Later on in the article, you will see some 2-digit numbers prefixed by a § (e.g. 
$03). This is the ATARI standard method for defining a hexadecimal (base 16) num- 
ber. The digits in the hexadecimal system are 0-9 and A-F (translating to 10-15 in 
decimal mode). By using hexadecimal numbers, it is possible to represent the nu- 
meric value of 1 byte in just 2 digits, making it easier to interpret it as indi- 
vidual bits (once you get used to the numbering system), plus it reduces the 
amount of space needed to display the number (2 locations instead of 3, since a 
byte can hold a decimal value from 0 to 255). 


You will often find that 2-byte numbers and addresses on the ATARI are stored in 
low/high format (the value as we would understand it is 256*high+tlow). This is be- 
cause that is the way the 6502 microprocessor chip (the heart of your ATARI) works 
with numbers and addresses. Many computers (including the human brain) work the 
opposite way (high/low), but not your trusty 6502. 


And now, on with the show. 
_ OVERVIEW 


Standard disks (the term is DOS 2 disks) have 720 sectors, numbered from 1 to 720. 
These are laid out in 40 tracks (40 concentric rings on the diskette) of 18 sectors 
each. Enhanced density disks (1050 DUAL density) have 40 tracks of 26 sectors 
each, yielding 1040 sectors in total. Getting back to DOS 2 format disks, of the 
720 sectors available, 13 are reserved for special functions: 


4. * 
. 1 initial boot sector 
2 - remainder of boot 
. eee garbage, but part of boot’ 
°360 — VTOC 
361-368 DIRECTORY 
720 unused 


This leaves 707 sectors free for use as data storage. 


The first 3 sectors are always 128 bytes long, while the remainder are either 128 
bytes for single density, or 256 bytes for double density. 


SECTOR LAYOUT - DOS 2 FORMAT DISKS 
DOS BOOT ~ SECTOR 1: 


BYTE: 


boot dos 


jump to 
load init boot init 
address address code 


BYTE : 10 11 12 13 14 15 16 ee 
7 boot end starting 
address+1 sector of | 
DOS .SYS 
BYTE: 18 19 20 127 
Continued: | low | high 108 bytes of data 


pos.sys boot instructions 


starting 
address 


Some of the flag bytes deserve more explanation: 


BYTE 10 - ACTIVE DRIVES FLAG - This is a set of bits that define which 
drive(s) are available for use by DOS. 
BIT: 76543211 - 


; || Fos Drive 
Drive 

Drive 

Drive 

7 Drive 
Drive 


Drive 
Drive 


OID PWN 


Typically, bit 0 will be on (giving $01), meaning drive 1 is available, 


or bits 0 and 1 will be on (giving $03), meaning drives 1 and 2 are 
available. 


BYTE 14 - DOS FLAG - This byte flags whether DOS has been written on the disk 
(i.e. DOS.SYS exists on the disk), and if so, what density 
it is: 
$00=no DOS, $0l=single density DOS, $02=double density DOS 


BYTE 17 - SECTOR LINK OFFSET - This contains the offset within a sector 


of the sector link information (described 
later). In single density, this will be 
$7D, and in double density will be SFD. 


DOS BOOT - SECTOR 2: | (22) 


BYTE : 0 1 2 3 : 
128 bytes of data (more instructions) | 


DOS BOOT - SECTOR 3: 
BYTE : 0 1 2 = 


128 bytes of garbage....ignore it 


VTOC = Sector 360: 


BYTE : 0 5-9 10-99 100-127 


max sector no no. free 


-garbage, sectors 
ignore 


Table of bits to sector numbers: 


mt 7 & G4 SE 


wee so [=] ]@[ [5] 6]? 
men [9 [ral a e[ of ehas 


ovee 99 [rz|niafnalnis|ne|na[nafne 


A zero bit means that the sector is in use. Note that sector 0 has a slot reserved 
for it, and. sector 720 does not. There was a communication mixup between the hard- 
ware developers and the authors of DOS. The hardware recognizes sectors 1 to 720 
but the developers thought it was to be 0 to 719 (DOS was written without having a 


real machine to work on....I think Bill Wilkinson and friends did an admirable 
job, considering; BASIC REV. A was developed the same way). 


Since sectors 1 to 3 are reserved, on an empty disk byte 10 should contain SOF. 

Then there will be a lot of S$FF's until we get to byte 55 (which covers sectors 360 
to 367) which will be $00, and byte 56 (which covers sectors 368 to 375) which will 
be $7F. The remaining bytes up to 99 will again be all SFF's 


The above structure makes calculating sector numbers/bit offsets fairly easy, 
since modulo 8 arithmetic can be used to convert back and forth, which is why Bill 
et. al. did it that way, and did not fix the problem later on, when it was uncov- 
ered. It would have been too difficult, I guess, so they left it alone. 


On a double density disk, only the first 128 bytes are used. The remainder of the 
sector is ignored. 


DIRECTORY - SECTORS 361 to 368 : C 


There are 8 sectors, with 8 entries in each (hence the limit of 64 files per disk). 
Each file entry is 16 bytes long, and is laid out as follows: 


BYTE: 0 1 2 3 4 


low. 


sector starting 
count sector 


= deleted. 
= exists | 
$20 = locked | 
= open for output 


FLAG VALUES : $80 


These bits can be merged together, allowing the following 5 combinations: 


$80 = deleted. 
$60 = exists and is locked 
$41 = exists and is open for output 
$40 = exists | 7 
$00 = entry never used since disk formatted 


Note that the directory only:knows the first sector of a file. All other sectors 
must be found by reading the file. This explains why, when you delete a file, that 
you hear the disk merrily reading sectors for awhile. In order to add the sectors 
from that file back onto the free sector list (in sector 360), DOS must find all 
the sectors, and so has to spin through the whole file. 


Since 8 entries at 16 bytes each yields 128 bytes in total, the last half of the 
sector is ignored on a double density disk. 


USER DATA - SECTORS 4 TO 359 AND 369 TO 719 


Gy 
BYTE: Se 
Single Density 2 user ‘data file no. | file no./chain | count | 


BYTE: 


eee Density a user “data file no. | file no./chain | [count | 


FILE NUMBER / CHAIN 


YTE: See ere ee & AS or LN re een eeeeveenv eee 126 or See i téteeis ae 
BIT: 7 6 ee 3 2 1 0; 7 6 S.--4& _ 2 0 


1 
6 bit file number 10 bit next sector number 
(0-63) . (0-1023) 


The file number relates to the relative position in the directory of the entry for 
the file owning this sector. If they don't match (i.e. the sector chaining has 


gotten messed up), you will get an ERROR 164 (file number mismatch) when process- 
ing the file. 


The count Field gives the number of bytes in use in the sector (1 to 125 in single 
density, 1-253 in double density). 


By using a disk sector editor (several are available in the CALTARI iipraty), you 


can examine your disks in more detail, and perhaps gain a better understanding of 
this information. 
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PERCOM DISK DRIVE with OS/A+ DOS 
PART 1 


*xk PRODUCT REVIEW Xx 


By Ed Sisul 


in mid-January, I 
from work to find 190 
drives in my living 
over a year of 
with the less than 
spectacular 410 recorder (actually, 
four 4190s), I conceded defeat and, 
along with nine other Atari owners, 
ordered a Percom disk drive. Three 


One day 
arrived home 
new Percom disk 
room. After 
frustration 


people purchased single-density 
drives, six puchased double-density 
drives, and one lucky soul purchased 
a dual—-unit, dual—-head, double-density 
drive. Mine was one of the 
double-density drives = and I have 
been using it with my 400e (al 172 
year old 400 enhanced with 48K, an 


add-on full stroke keyboard,and a 
GTIA chip, but no ROM B upgrade). To 
date, all of the single-unit drives 
worked reliably -—- no problems 
whatsoever. One drive of the 
dual-unit failed after one month and 
it took about one month to repair 
the drive. The Fercom appears to be 
fully compatible with existing 
software for the Atari. We have 
found no commercial software, 
heavily protected or not, that won’t 
work on any of the Percom drives. In 
fact, even the problem of formatting 
disks with Letter Ferfect discussed 
in the April "83 issue of ANTIC 
magazine doesn*t seem to be a 
universal. problem. 1 Ve Nac —no 
problem formatting and using data 
disks with Letter Ferfect on my 
system. 


from Percom 
Resides the 
Fercom offers 
and Atari 


Why Buy your drive 
rather than Atari ? 
obvious reason that 
double-density drives 
doesn’t, the Percom drives are 
designed to reduce the cost of 
expansion. The initial drive 
contains a controller that can drive 
three add-on drives. The 


add-on drives eon” t need a 


LILA AC RDOCIC 
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controller, consequently they cost 
$100 to $200 less than the master 
drive (but a $30 cable is needed to 


interconnect up to 3 add-on drives). 


Percom also offers dual UNL tS at 
less cost than the cost of one 
controller and one add-on unit. The 


dual-unit, dual-head, double-density 


drive doesn’t cost much more than 
two 810s. In all. Fercom offers six 
types of drives: a single-head/SD 


dual-unit, single-head/SD 
drive, a single-head/DD drive, a 
dual-unit, single-head/DD drive, a 
dual-head/DD drive, and a 
dual—-unit,dual-head/DD drive. Each 
is available as a controller drive 
or as an add-on drive. 


drive, a 


The Percom uses an upright drive 
unit (the disk rotates in the 
vertical plane rather than in the 
horizontal plane as it does in the 
810). The drive unit is manufactured 
by Tandon. The Fercom is heavier 
than the 810, mainly because it has 
a metal cabinet and a Built-in power 


supplys but is considerably more 
compact than the 810. The Fercom has 
two serial I/O ports in the back 


(12-pin MOLEX sockets just like the 
one on the side of the 400/800). One 
is used to connect the Percom to the 
computer. The other can be used to 
connect an 8190 or another Fercom 
controller drive to the Fercom as a 
second drive. It can also be used to 
connect a 419 recorder to. the 
computer through the =Percom. There 
is a third connection in the back 
for attaching the add-on drive 
cable. The DD drives use a flat 
cable connector, but the SD drives 
extend the edge connector of a pc 
board through a slot in the cabinet 
as the connection point. The DD 
drives contain a 4-pole DIF switch 
in the back for drive number 
assignment (and for default density 
asignment) that are more convenient 
to. use than the drive number 
switches on the 8104, but the SD 
drive uses four bent pins (on the 
edge connector ) that must be 
The 
indicator 


jumpered to configure the drive. 
Fercom uses a single 


LED 


ei aes 
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w the. front panel that glows dimly 
lickers) at turn-on, is off during 
standby, and glows brightly during 
read/write operations. The an/off 
rocker switch is located in the rear 
and is confusingly labled I for on 
and O for off on my drive. 


S50 much for the mechanical 
aspects of the Percom drives. Now 
let’s discuss the particulars) of 
operation. Since the operation of 
the SD drive is virtually identical 
to that of the 8190, I won’t discuss 
the SD drive any further. The rest 
of this article will be devoted to 
discussion of the DD drive. The 
double-density drive is currently 
supplied with OSS OS/A+ DD DOS, 


Version 4.19. :< can also be used 
with Atari DOS 2.905, OSS OS/A+ SD 
DOS, and Atari DOS converted to 


double-density DOS (DOS 2.0P). To 
keep this review from taking up an 
entire newsletter, I’1l review the 
Semi al features of the 
ble-density disk operating. 

systems in detail in next month’s 
newsletter. The double-density drive 
can read, write, or format in either 
the double-density mode or the 
single-density mode. When a 
formatted disk is booted, the drive 
automatically switches to the proper 
mode of operation. Unlike the 810 or 
the SD Fercom, the DD drive uses an 
LED and a photocell to sense the 
index hole in the diskette when 
formatting a disk. Consequently, 20 
format the backside of a disk, it is 
necessary to punch a set of holes in 
the disk jacket (in . addition. -to 
punching a write-protect notch) £Or 
the flip side. A technique for doing 
this is described in detail in issue 
10: of “ALN. ALL. OG. magazine. I"ve 
been using this technique since 
acquiring my drive (I always use 


both sides of a disk) and have had 
no problems. An 
b 


alternative is to 
flippy-floppy disks, which are 


igned to be used on both sides in 
drive, but to me its 
cost. in thie 
disks, one 
index 


a single-head 
not worth the extra 
case of single-density 
other alternative exists. The 
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hole iss only used to format the 
disk. [It is not used for read/write 
operations. This means that if you 
have access to an 8190 or a SD Percom 
you can format the backsides on one 
of these drives, then use them on 
the DD drive without having to punch 
the holes. I have had no short term 
or long term problems using both 
sides of single-sided disks for 
either SD or DD storage. 
Furthermore, I have had no problem 
formatting or using SD disks for DD 
storage (or, for that matter, using 
DD disks for SD storage). Just to be 
safe, however, I store all important 
DD files on DD disks. 


Is the double-density capability 
worth the extra price of admission ? 
If you are a novice programmer and 
Only use purchased programs, the 
answer probably is no; otherwise the 
answer is a definite yes. There are 
two main advantages to 
double-density: reduction of the 
number of disks needed toa store 
programs and larger data 
capacity and faster data access for 
UtTLity or business type 
applications. Obviously, Since DD 
disks have twice the storage 
capacity of SD disks. only half as 
many disks are needed to store 
information in double-density. 
Unfortunately, not all programs = can 
be easily moved to double-density. 
It*s usually no problem to move 
BASIC files and binary load files to 
double-density, stacking as many to 
a disk as will fit. Many purchased 
programs, however. are machine 
language, boot load files and you 
will be stuck with one program to a 
disk unless you are a skilled hacker 
and can convert them to binary load 
files that will run in 
double-density. Even if you can’t 
convert every program, the typical 
library will benefit from usge of 
double-density storage. For example, 
my current library consists of about 


37 programs on 27 sides of SD disks ( 


and 152 programs on 9 sides af DD 


disks. You probably won’*t recoup the ~ 


extra cost of the drive in disk 


storage 
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savings, but just being able to 
reduce the quantity of disks to have 
to store and sort through is worth 
the extra cost. There currently are 
no off-the-shelf application 


programs available that take 
advantage of the added data capacity 
and data access speed of the 


double-density system, consequently 
you will have to convert existing 
programs or write your own custom 
application programs to benefit from 
these capabilities. Hopefully, as 
more systems reach the field, the 
software houses will begin to 
generate programs specifically for 
double-density. § 


LOAN AMORTIZATION TABLE GENERATOR 


by Charles Robinson 


Here’s a program that no home 


computer should be without! No - 


longer will you have to fret and 
worry over whether you can afford 
that new peripheral - now you can 
instantly know what your monthly 
payments will be! 


I’ve checked the numbers versus 
my house and car loans and the 
numbers agree within a few cents so 
you can safely trust them (just 
don’t go argue with your bank over 
the differences!). 


The numbers go by pretty fast so 
either stop the program with a CTRL 
1 or send it to your printer (if you 
have one) by changing the PRINT 
statement in lines 519,530,550, and 
360 to LFRINTs. 


(The original program was 
written in DEC’*s FOCAL mini-computer 
language. ) 


JUNE = £983 


1 REM KXKKK KKK RAKE KKK 


*¥ LOAN AMORTIZATION TABLE x 
* x 
2 REM * ORIGINAL IN DEC FOCAL x 
Translated Ry * 
x Charles Robinson x 
os REM * JUNE ’83 AURA OUTPUTS x 
KKKKKKKKKKKKEK EK KKKKKKEKKKK KKK 
me. ¢ GARSCIZS) 27. 2 LOAN AMORTIZA 


TION TABLE":? :? :? :? 
20 ? "ENTER INTEREST IN PERCENT": : INPU 
*3 
20 ? “ENTER AMOUNT OF LOAN";: INPUT A 
40 ? "ENTER NUMBER OF YEARS";: INPUT N 
SO ? “ENTER # OF PAYMENTS/YEAR": : INPUT 
M 
100 J=J/100 
110 N=NxM 
120 I=J/M 
130 B=1+I 
140 R=AXI/(1-1/B*N) :R=INT (100*R+0.5) /1 
ere) 
200 7? :? :? “MONTHLY PAYMENT IS "sR 
va 2 ar aaa 
220 ? "TOTAL INTEREST IS ":RxkN-A 
Ss "2 
240 ? 
NPUT T 
250 IF T=0 THEN 1000 
500 B=A 
510 72? "\":? :? “INTEREST APP TO PRIN 
BALANCE":? :? 
515 POKE 201,12 
520 L=BkI:P=R-L: B=B-P 
525 L=INT(100*kL+0.5) /100:P=INT (100xP+0 
.5) /100: B=INT (100*B+0.5) /100 
S350 7 L,P,B:? 
S40 IF B-R>O THEN 520 
545 FI=Bk1:FP=R-BkI:FI=INT (100KF1+0.5) 
/100:FP=INT (LOOKFP+0.5) /100 
SSO ? FI,FP:? :? . 
S555 LP=BxI+B:LP=INT (100xLP+0.5) 7100 
560 ? "LAST PAYMENT! "sLP 
570 POKE 201,10:?7 :?7 :? 
S80 7 "ENTER © FOR NEXT PROBLEM, 
ENTER 1 TO END";:INPUT Z 


"PRINT TABLE? (O=NO, 1=YES) "3:1 


590 IF Z<1 THEN 10 


1000 END 


SE ee pe ee ee - 
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33) DISK DRIVE/OS/A+ DOS —- PART 2 


by Ed Sisul 


In the JUNE newsletter, I 
reviewed the new disk drives from 
Percom. As promised. this month I 
will review the double-density 


operating systems available for the 


Fercom. 


The DD drive is currently 
supplied with OS/A+ version 4 from 
Optimized Systems Software (OSS)"« 
My drive came with version 4.0D, 
which has since been superseded by 
version 4.1D. Two other DD 
operating systems are available for 
use on the Fercom: OS/A+ version 2 
and Atari DOS 2 converted to 
double-density. 


Refore OS/At version 4 was 
available, the Percom DD drive was 
supplied with a disk containing two 
utilities: one, calited BLD, +6 
convert DOS 2.90S to double-density 


DOS 2.1P; and one called SDCOPY, to 
transfer files between DOS 2.95 = and 
DOS ae ase This disk is still 
available and can be purchased from 
Fercam for about $30.00. It’s 
worthwhile’ to acquire this utility 
if you want to use any of the 
"canned" disk utilities (such as 
AUTORUN. SYS files) found in 

magazines with double-density since 


most of them, as written, will work 
with DOS 2.1F but not OS/A+. 


OS/A+ was developed at OSS by 
the authors of Atari BASIC and Atari 
DOS as an enhanced disk operating 
system. It originated as version 1 
for Single-density applications. 
Version 2 was developed to access up 
to 25S6F bytes per disk and supports 
single or double density. Version 4 
was developed to access up to 15M 
bytes per disk with up to Si2 bytes 
per sector. Qn the Atari, version 4 
can only be used with the 
Version 1 and 
maximum file 


double-density drive. 
version 2 provide the 


ee ee ee ee _ _ 


compatibility with DOS 2.058 (all 
three use the same FMS). Version 4, 
however. uses a mapped file 
structure (instead of the linked 


file structure used by DOS 2.0S = and 
versions 1 and 2) to provide fast 
true random access”) files {you can 
FOINT without the need to have 
previously NOTEd). The overview of 
OS/A+ that follows is based 

primarily on version 4. However, 
most of the features of versian 4 
are available on version 1, so those 
of you interested in an enhanced 
Single-density operating system can 
benefit from the discussion. 


OS/At+t uses aA command driven 
system that provides features and 
conveniences not available with 
Atari menu DOS. OS/A+ uses three 


classes of commands called intrinsic 
commands, extrinsic commands, and 
execute commands. The intrinsic 


commands access memory-resident, 
commonly used disk utilities; the 
extrinsic commands load disk 

resident utilities (mostly copy 
programs); and the execute commands 
are Ba subset af commands that 


provide for batch execution of OS/A+t 
commands from a file. 


The 
into 


intrinsic commands are 


loaded RAM as part of DOS.SYS 


when the disk is booted (no DUP.SYS 
in US/A+t). Typing DOS accesses 
these utilities without disturbing 


any user program in memory 
for MEM.SAV with OS/A+t). When DOS 
is entered, the screen is cleared 
and the prompt "D1l:" appears as a 
reminder of the default drive and to 
accept a command. There are 13 
intrinsic cammands' which May be 
given by typing in the first three 
letters of the command name. They 
are: 
CARtridge —- Re-enter the cartridge. 
DIiRectory —- List the disk directory 
to the screen or the printer. 
END —- Stop execution (for batch 
processing). 
ERAse —- Delete a file. 
LOAd - Load a binary file into 
user memory. 


(no need 
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creen —- Turn off command echo 
(for batch processing). 

PROtect ~ bock a fite. 

REMark - Frint remarks on the 
screen (for batch processing). 

REName -—- Change the name of a file. 

RUN - Transfer control to an 
address in memory. 

SAVe - Save a portion of memory 
to disk. 

SCReen - Cause batch commands to 
be echoed to the screen (for 
batch processing). 

TYFe - Frint ATASCII text files to 
the screen. printer, oar another 
disk file (version 4.1D oanly). 

UNProtect - Unlock a file. 


All of the commands (other than the 
special batch processing commands) 
function similar to their DOS 2.905 
counterparts. Version 4 allows 
filenames of up to 30 characters in 
length. The intrinsic commands and 
the double-density capacity consume 
@* 4K of free RAM. Consequently, 
recommends using OS/At on a 
system with at least 32K af RAM. 
The RAM/disk space consumption of DD 
verses systems is shown below. 


TABLE 1 
OPERATING DOS DISK FRE (©) 
SYSTEM FILES SECTORS 48 KE 
DOS 2.05 DOS.SYS Ry 4 32274 
DUP.SYS 42 
OVERHEAD 135 
OS/A+ V.1 DOS.SYS 43 31758 
OVERHEAD ms 
DOS 2.1P D0OS.SYS Beg 28818 
DUP.SYS 2 


OVERHEAD 13 


OS/A+ V.4 DOS.SYS =O 28430 
OVERHEAD 21-23 


The extrinsic commands load and 
ro special disk resident utilities 
that have the file extension . COM 
(e.q. COPY.COM). There are nine 
fundamental commands supplied with 
versions 2 and 4. They are executed 
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by. -Cyping .in- all -of - the letters 
preceding the .CQOM extension. They 
are: 


ADOS ~- Installs version 2 along with 
version 4. This allows access of 
DOS 2.9S and version 4 disks while 
transferring files. Used in 
conjunction with COP Y24. (i353 
sectors 


CONFIG —- Used to report the status 
Of. asl drives and to change the 
status of configurable drives. Se Be 
sectors) 


COPY —- Used to copy files (except 
between version 2 disks and version 
4 disks). Includes options to force 
overwrite of an existing file, query 
before each file transfer, display 
prompts when capying on a single 
drive, and wait for proper disk 
insertion. (27 sectors) 


COFY24 — Used to transfer files 
between version 2 disks and version 


4 disks. This is how files are / 
transferred from single-density to. 


double-density and vice-versa. (21 
sectors) 


DO - Used to perform several 
Operations on one command line. Cz 
sectors) 


DUFDEBL ~—- Used to copy entire version 
« double-density disks (version 2 
only). 

DUPDSE - Used to copy entire version 


< SD disks or version 4a DD disks. 
CS sectors) 


HELP —- Frovides a menu of system 
commands to help the beginning user. 
(15 sectors) 


INIT =—-Used to initialize (format) a 
disk. (12 sectors) 
Rozcoe -~ Instalis the serial device 


handlers Spt ee eee for use with the 
850 Interface Module. (1 sector ) 


The number in parenthesis after the 


ees . ‘- ~ 
» a. ? 2 
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explanation is the number of disk 
sectors occupied by the program ona 
version 4 disk. These commands) of 
course can only be invoked when a 


disk (usually the master system 
disk) containing the particular 
program 1S inserted in the drive 
and, Since the program is loaded 


into RAM, any user program present 
is erased. Any DOS-compatible load 
file can be made into an extrinsic 
"command" by atftixing the - .COM 
extender to its filename. 


The execute feature allows. 


execution of one or more commands 
with a single command. Any text 
file with the filename extension 
»~EXC can be used as an execute file. 


Each line of the file must be a 
valid OS/A+ command. Batch 

processing is initiated by typing in 
the filename, less the AG 

extension, followed By the symbol 
"a: if the file is named 
STARTUF.EXC, it is automatically run 
upon boot of the disk (equivalent to 
AUTORUN.SYS of DOS 2.05). 


OS/A+ also supports all BASIC 
disk commands such as RUN, SAVE, 
LiSt,. LOAD, ENTER, . Put, GET, etc. 
The LOAD or RUN commands execute 
from OS/A+ version 4 at about the 
same speed as from DOS 2.905, but 
SAVES and ERAses (DELETES? are 
executed much faster in version 4. 
Table 2 below compares the execution 
times of a 26K (of code) RASIC 
program (GAMBLER from SOF TSIDE 
MAGAZINE). 


TABLE 2 
OS/A+ DOS 
V.4 2205 
DISK SECTORS: 100 207 
LOAD TIME (sec.): a Le 
SAVE TIME (sec.): Lo 55 
DECETE TIME (sec...) : 4 24 


Copying of files or entire diskettes 
in double-density works essentially 
the same as & does in 

single-density. Copying a full 
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Version 4 double-density disk 


(DUFPDSE) require 


S 


S1x 


passes ig 3 


disk swaps with one drive) and takes 
about seven minutes. 
the contents of a SD disk to a DD 
disk or from a DD disk 
is a more difficult task. It must 
be done one file at a time, using 
COFY24 with OS/A+ or SDCOPY with DOS 
Seas This is especially slow § and 
tedious with OS/A+ if 


contain lots of 


fi 


les, 


Transferring 


to. SD disks 


the disks 
because ee 


almost always takes two passes (four 


disk swaps) for 
transferred. 


each 


OSS boldly states in 
manual that "we firmly believe that 
the command system of 
Console Frocessor 


to a menu approach". 


(CP) 


Tite to: te 


the OS/A+ 


the OS/A+ 
is superior 


row «can - the 


command system be simpler or easier 
than typing a single letter from 4a 


menu (ala DOS 2.095), 


Is OS/A+ really 
After learning 
Simultaneously, 
that OS/A+ is 
To quantify this, 


which (although 


th 


I 


a 


you might ask? 


at much better? 
to use both systems 
certainly feel 
a better way to goa. 

I’ve put together 
a scenerio based on my experiences, 


bi 


t extreme) 


serves to illustrate the advantages 
of the command approach. 


After an hour of 
another installment § of 
epic program, GHOSTSTOMPER, from 
FRANTIC magazine, 


and Save 5 i to 
remember which 


have to access DO 


Luts 
disk. 


typing: in 
the great 


time to stop 
LL carr’ +t 


version I*ve- just 
completed and I’m not sure how much 
room. ts .lfeft .oan-the disk, so 1’}1 


S. 


Usi 


nq Atari DOS 


the entire save procedure would go 
something like this: 3 


Ls Type bos 
Watt... Wet t ws 


ee Type 
directory listing 
as last entry 
Weta rino. OK. I’ 


GHSTSMP.V1 O° make 


+ 


A 


CRET I 


ae WML Bak 


or MEM.SAV to do 
its thing (used this time to thank 
God that MEM.SAV was on this disk). 


CRE TIOCRET I. tor 


See 


“GHSTSMF. V2" 


followed by "5S FREE 
have to erase 


ll 


room or 3 
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Ss. see, do I type E for erase or 
1422 “DAA The menu was scrolled 
off screen by the directory listing. 


3. Type CRETIJ for menu - AhN-AR! 
D for delete. 

&.-1yoe.0 TRE) --. See. “DECETE 
PIC See. Oh no! I forgot what 
abbreviation i“¢ concocted for 


GHOSTSTOMPER and the menu has erased 
the directory from the screen. 


S. tyoe A (RET] -— Wait... 
wait... Oops, CRETIJ again - See 
"GHSTSTMP.V1". 


6&. Type D CRETI (I remembered it 
now) 


Ze ype. GHSISINE.VL. CRET I (Good 
thing I wrote it down at step 6 
because I can*t see the bottom of 
the directory listing anymore). 


@.. tyoe ¥. CREF] -= 12.) assume 
its gone. 


9.-(yoe BB TKET]: for . cartridge 
(This one isn*t hard to remember) —- 
lat t..46: Watt... Watt.<«s for > MEM. SAV 
to disgorge. 


19. Type SAVE"D:GHSTSTMP.V3 

CRET] - I guess I’d better lock the 

file so I don’t blitz it later. sz 

Here we go again. 

11. Type DOS Wait... 
Walt... Wait... 


8 9 RO a oe 


iZ. type A CRETI] ERETI to make 
sure V.3 is really there. 


iS, type t ERED? #Ge ‘lock: ~ What 
do you mean “LOAD FROM WHAT FILE?"! 
rete Ss 


14. Type CEREAK] CRET] - See "F. 


oe FALE” 


iS. Type F CREF2 
16. Type GHSTSIMP.VS CRET 2 
Wait... 


ee Type B CRET I =f 


AUGUS! LY. 


Wat Sig 6 Wai Ch 6S 


i8. Catch breath. Stretch.-7 
Fingers. Froceed. ; 
Using OS/A+ version 4, the whole 
procedure almost always would go 


like’ tnis: 
i. - ype. DUS CRE) 


2, «ype VIR CRET tor directory 


listing —- See GHOSTSTOMPER.V2 = as 
last entry followed by a FREE 
SEC FORS. 

we Type ERA GHOSTSTOMFER.V1 


CREF (The directory was 
visible on the screen). 


still 


a. Aype CAR. CRE] to. return —to 
BASIC —- Program still in memory. 


S. Type SAVE "D:GHOSTSTOMPER. V3 


CRET I. 
6. Type DOS CRETI 
7a yee Bi - CREEPS 


8. Type PRO GHOSTSTOMPER.VS 


CRET J 


9. Type CARP CRETI (Just 
some fun. Only the 
letters count). 


having 
first three 
10. Proceed. 


eliminates 
Atari DOS: 


AS you can see, OS/A+t+ 
four drawbacks to 
MEM.SAV, the eight character limit 
for filenames, the need to recall 
abstract one-letter codes, and the 
idiosyncracies of the menu/directory 
displays. 


SO. is) cliosing,:- 1. find that “the 
Fercom disk drive in conjunction 
with OS/A+ is not only more powerful 
than the Atari disk system, but also 
is a better value for the money. 


TT BH TH EB 
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FProduct Update 


by Atari, Ire, 


AtariWriter is the mew word processing software 
now available from Atari, There are a ruvber of 
differences between the old Atari word processing 
program ard the new Atarikriter, 


The new Atarikriter software is considered FILE 
oriented, while the old word processing program is 
considered page oriented, The formatting = ard 
paginating time with a lengthly docwwent is greatly 
reduced over the old word processing program, because 
AtariWriter formats a document as it prints. 


Ataritriter is available in cartridge form, not 
diskette, so document files carn be saved to cassette as 
well as to diskette, This wears more memory is 
available to write and edit with. Also, ro more 
worries about the Master disk. goire bad' It may be 
used with either the Atari 400, 800, 1200XL, 690XL, or 
800XL computers. 


Even though AtariWriter has a 40 column screen 
output, it compersates for this limitation with a 
unique print preview feature. Print preview allows the 
user to view the 80 column format on the screen before 
the document is printed, The use of the ESCAPE key 
arytine during the writing/editing of a dociment will 
take the user hack to the menu with no hara to the file 
or system. Also, the SYSTEM RESET key can be used to 
return the user to the program mer with mo hare to the 
file or systen, 


Atarikriter is extremely user-friexly amd is 
Compatible with any mon-ATARI parallel printer. The 
user cam easily insert the control codes for their 
printer anywhere into the text, thus giving thes all 
the special functions of their nor-Atari printer. This 
puts an end to printer/program incompatibility. Also, 
the Atarikriter can be merged with docusent files fren 
the old Atari word processing progran. 


Control Codes. The AtariWriter hkord Procecsor 
may be used with ary parallel (or "Ater1 serial”) 
printer, The Ataritriter program includes printer 
drivers for four Atari (820 and 822 40 columi ard 825 
and 1025 80 colusn) pririters. 


If you intend to use Atarikriter with any printer 
other thar: those listed above, you will reed to obtain 


3 printer driver or use your printer’s control codes to 
format ard print your documents. The followirg steps 
illustrate how to eriter printer control codes into your 
Atarikriter text. 


1) Select the proper decimal coritrol code sequerce 
from your printer marwal for the function you want to 
perform, (You may have to covert the hexidecinal 
values to decinal.) 


2) Enter the control code sequence at the desired 
Place in your Atarikriter document. The codes are 
entered by typing “control 0” before each cecinal 
musber in the cotrol code sequence. Control codes that 
affect the entire document should be placed at the top 
of the text immediately under the Atarikriter’s format 
codes, Coritrol codes that affect only portions of the 
text such as underline ard dovble width (elongated) 
print should be inserted in the text at the point where 
the function begirs. 


3) When you use the "Frint” or “Frint Freview” 
function the first time after you load Atarikriter, the 
names of for Atari printer drivers will appear at the 
bottom of the screen. If you do not have ore of the 
printers listed, select the 3rd printer (Atari 820) 
driver and then print or preview your document. 


Example. If you warited to use elorosted print 
and your printer’s decisal control codes were 14/117 to 
start elongated printing ard 14/118 to erd elormated 
printing, you would do the following to print an 
elongated heeding called EXAMLE: 


1) Hold down the key markec “CTRL” with ore hand 
ard with the other press the "0" key. This will put 
the irverse video letter "0" om the screen. Then type 
the first decimal reuimber "14". Again hold dam the 
“CTR.” key while pressing the "0" key ard then tye the 
rumber "117", Kow type the word "EXAMPLE" and then 
repeat the process usire the control key, control 0, 
ard the rambers 14 ard 118, Your screen should row 
look like this (uréerlined characters on the paper 
represent irverse video characters on the screen); 


0140117EXAMFLEO140118 3 


- EACH 3ecimal rumber, 


2) Note! ¢ "CONTROL O” must be placed in front of 
The “RETURN” key msut be pressed 
somawhere im the document after the point in which the 
codes were inserted. 


3) Or, those printers that have international 
eharacters you must first enadle the pririter’s 
charecter set (using “CONTROL 0 / decimal code” 


sequence outlined above) and then repeating the 
sequence for each character to be printed, 


4) The control codes wil] mot print on your 
printer ard will mot take up space unless directly 
followed by pressing “RETURN” in which case they will 
appear as 3 blark line om your printer, 


Using the nethod above, you should be able to 
ottain almost ary capability thet your printer can 
perfarm. Do rot try to mix type styles on the same 
line (such as elongated ard 10 cpi). Atsrikriter has 
mo way of knowing what codes you are sending to your 
printer ard therefore carmot sake the spacing 
adjustments to compensate for the charae in print 
styles. This should mot be a problen if you have a 
pririter driver. 


~ YOUR KEY 


Get 

professional 

80 column word 
processing, data 
management, remote 
terminal configurations, plus many 
more applications thanks to the 
BIT 3 FULL-VIEW 80. Clear crisp 
characters on your CRT monitor 


LLOBir 3000 
FULL-VIEW 80 


80 COLUMN CARD 


or, Basic Cartridge, Macro Assem- 


Printer Drivers. The purpose of 2 printer 
driver 1s to convert the printing ard formatirg codes 
in Atarivriter to codes that your printer understards. 
Using 2 printer driver with Atarivriter will allow you 
to use the printer codes in the AtariWriter marual, 
For all printer functions supported by Atarikriter you 
will rot need to use the "CONTROL 0 / Gecinmal code" 
sequence mentioned above. Frinter drivers are fow 
available for the following third-party parallel 
printers: 


Atari 1020 are Atari 1027 
Epsor: MX-80, FX-B0, arc MX-10 
Epsor: MX-80, MX-100 w/GRAF TRAX 
FFSON MX-80, MX-100 FT ITZ 
CEMINI-10 

NEC-8023A 

C. Itoh FROWRITER-8510 

IDS 480 

Mannesmann Tally 

Owidata Microline 92A ard 93A 


Disks retail for $24.95 ard each disk. contains 2 
file for every printer listed above. 


TO ATARI® 860 
ENJOYMENT 


See areview of the FULL-VIEW 
80 in A.N.A.L.0.G. Computing, 
Issue 9, page. 31. Other reviews avail- 
able upon request. 


with full descenders are standard. 
And all your current Atari 40 col- 
umn and graphics programs work: 
switch between normal Atari 40 
column/graphics mode and 80 col- 
umn mode either under program or 
keyboard control. Just plug into 
slot 3, cable up and fun. Maintain 
48K RAM capacity by installing the 
BIT 3 32K MEMORY PLUS RAM 
card in RAM slot 2. 

LJK’s Letter Perfect gives you 
an 80-column word processor using 
our Full-View 80. Other popular 
software that runs with the FULL- 
VIEW 80 is Atari’s Assembler Edit- 


bler, and PASCAL; Optimized Sys- 


_ tem’s Basic A+, OS/A+ and EASMD; 


Microsoft’s BASIC; Teletari by 
Don’t Ask Computer and T.H.E. 
Smart Terminal by Binary Computer 
Software. More applications are be- 
ing added every day including CP/M 
by SPW. 


CONTACT 
BIT 3 

OR YOUR 
DEALER FOR 
PURCHASE. 


Fege £3 


OTHER FINE PRODUCTS FROM BIT 3 


For Apple computers: Full-View 80, 
2 Serial Channel Card. For 1BM PC com- 
puters: Multibus Expansion; General 
products: RS232 Gender Changer/Pin Re- 
configurator. 


OUBr3sinclet_ 


COs” UTTER CORPORAT 
8120 Penn Avenue South 
Minneapolis, Minnesota 55431 
612—881-6955 


VISA-M/C 


© 
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A USE FORE PER COoOMms 
Ror Drs DOWRNRILOAD 
BBS 614-387-3774 

Many callers to the Dr. Download 
BBS are amazed by the sheer volume 
Of d/l files. “Surely you must be 
running an ATRSOOO with 8" drives!" 
they say. Not so! A more elegant 
way to construct a large data base 
is to acquire a Percom controller 
card. These magical PCBS enable 
Atari users to connect any 34-pin 
Shugart-—-compatible drive mechanism, 
such as Tandon 100-2, Teac, MPI, 


etc. to their systems. The term 
"“Percom drive” is a misnomer : 
Percom did not make drives! They 
made controller cards, boxed them 


with power supplies and MPI drive 
mechanisms, & sold $150 of hardware 
for $450 (for a SSDD model 


or for %750 (for a DSDD rt 


RFD44). 


e 
difference was a e model 44 
drive mechanism had two heads, a 
feature that must have cost Percom 
an additional $15. The slim volume 
of documentation that accompanied 
these models mentioned that “Percom 
Slave drives" could be connected to 
the 34-pin plug, and seemed to 
imply that these “slaves” were 
specialized hardware. The fact is 
that any generic disk drive can be 
connected to an Atari computer 
using a Percom controller card. 
Percom cards with model numbers 
RFD44, RFD40O, and ATSS-SPD feature 
the 1795 disk controller chip that 
is designed for SD, DD and DSDD 
operation. The cards have two 
standard Atari serial ports, and a 
34 pin parallel plug (RFD4O, —-44) 
or edge-card connector (ATS8S). 
Naturally, our interest is in the 
S4-pin connector, through which any 
any four Shugart-compatible drives 
can be wired in parallel. There is 
nothing special about the drive 
mechanism that comes in the box: it 
is connected in parallel also, and 
may be removed or replaced. So, 
lets say you have an ATSS that came 
with a SSDD hal f—-height MPI 


mechanism, and that you want to 
replace this mechanism with four 
(giving 

about 
Page i1 


Tandon 100-2 DSDD drives 
you 1.5 Mb of storage for 


: C UAk0 
pppoe at Foe Rie as 
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$500—-—not a bad deal). Pull out the 
MPI unit & sell it to someone you 
don’t like (that particular model 
Gives problems). Use standard 
Plugs, connectors & ribbon cable to 
wire the Tandons to the edge card 
connector on the ATS8- controller 
card. The analog board of each 
drive features a jumper socket for 
selecting the drive number of that 
unit. Jumper each drive as O, 1, 2, 
and 3, respectively. The physical 
location the drives with respect to 
the card 1S unimportant, as is the 


type of drive. SD and DD drives 
may be mixed & matched as desired. 
The new Percom ROM from Wordmark 


Systems, Garland, Texas, allows use 
of 8" drives as well'! A true 
fanatic could thus connect four 8" 
DSDD units to make a6é& Mb data 
base! Dr . Download uses four 
Mitsubishi 48353 drives. These units 
are S", half-height, Y6-TPI cuties 
that can write 80 tracks per side, 
storing 720K per  Atari-formatted 
disk. At $150 per drive, plus s%40 
each for two power supplies, plus 
$60 each for two dual enclosures, a 
2Mb data base was created for less 
than %700. All of this hardware 
was advertised in Computer Shopper 
The DOS you use will make you or 
break you. Dr.Download uses MYDOS 
2-913, a menu-driven DOS that looks 
comfortably like dear old Atari 
2.-9S, but is actually a much more 
powerful system that will allow you 
to run any combination of SS, 2S, 
“ila Us <a a; 40 track or 30 
track units completely 
transparently. We use MYDOS to 
software-configure each drive “for 
=o or Db. So or DS, 40 or 380 track 
operation. Prospective users 
should be aware that the nitty- 
Gritty details Of exactly how 
things work with each type of drive 
depend on the ROM in the controller 
card. The Percom ROM went through 
many revisions, and no one version 
seems to do everything correctly 
for every type of drive mechanism. 
For example: the RFD40O card that 
runs Dr.Download uses the 1.1 ROM, 
which reads and writes to 80-track 
drives, but will not format them! 
The ATS8 card, which uses the 3 Se 


Set 
, 
t : 
; 
er’, 
- 


rPERCOM cont. 

ROM, will read, write & format on 
80 track drives, but has the 
annoying habit of forgetting the 
SD/DD settings for the upper 3 
drives on booting. Needless to say, 
Dr.Download has an ATS8B controller 
card operating offline to format 
disks for the BBS, and has 100 
formatted disks in storage against 
the time that the ATS8S card dies. 
Which brings up another important 
topic: the reliability of Percom 


service & support, and the 
longevity the controller cards. 
Percom no ‘longer sells drive 


systems for the Atari. They do 
service the old drive systems, and 
if you are planning to build a BBS 
around an obsolete controller card 
you will want to know about your 
last line of defense. The Percom 
drive system is an example of a 
teriffic concept crippled by 
miserable engineering. Percom 


crammed the whole works into an 


enclosure that was too small and 


inadequately ventilated. The 
result often was that the card 
Slowly fried over periods of 
extended use. The controller card 
for a BBS must therefore be 


enclosed separately from the drives 
it services to keep Le €oeGdi & 
comfortable. Le it dies anyway, 
send it to the Pertom hospital in 
Dallas for replacement, and keep 
replacing dud cards until you~ get 
one that works. When the card 
works in a cool environment it will 
run indefinitely. The Dr.Download 
BBS controller card has been 
operating continuously since August 
1984 without missing a beat. The 
Dr.DOwnload backup controller card 
has been replaced four times in the 
Same interval, sO you just can’t 
tell by looking. The Percom 
hospital in Dallas is a strange 
Place from which drives may be 
returned in a week, or in 10 weeks, 
depending on nothing that you can 
see. If you are in dire need of 
your card or drive, phone it in as 
a rush order andit will return 
within 5S days for a 10Z surcharge 
(an extra $5 on the $355 charge for 
replacing a controller card, for 
example). They will not sell you 

Page i2 


an extra card; 
nothing 
discussed in 


drive asa 
oe Le ge | 


whatever 
this 


they profess to know 
about 


anything 


essay, and are 
likely to lie to you if you ask the 
innocent question, 


“Can 


Slave for a 
need a Percom 


I use any 
Percom, or 


slave?". So 


thats the story about Dr.Download’s 
Callers will find 
2& menus of the 


~~ 
~ 


it crammed 
best 


Mb data base. 
with 
public domain 


Graphics demos, 


fancy fonts, 


programs for the 


telecomm 


listings from 


COMPUTE! 


programs, 


MUSIC, art, 


Pinball games, 


ANTIC, 
Eric Anderson, 


magazines. 


managing editor of the 


DAILY CALL, 


topics in the ANDERNET 
furnishes the 
Revi ews that 


Meanwhile, 


1200 baud. No 


eS: G ee 


call 


BBS 
pull 


Jean Rowe BASIC music, 
1020 
and 


plotter, 
complete 
ANALOG and 


Piqua, Ohio 


writes essays on Atari 


column, and 


with Product 


no 


punches. 


Dr. Downl oad 24 
hours daily at 614-587-3774, 300 or 
password, no time 


just huge phone bills. 
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055 & ICD join forces 


DATELINE: 1-27-88 

Good news for Atari owners! 
ICD, Inc. and Oss, Inc. 
(Optimized Systems Software? 


have just signed 


an agreement which will "add 
new life to all Atari 
computers". Under this 

agreement, ICD will add the 
manufacture, marketing, and 


support of all 
current OSS software titles for 


Atari computers to ICD’s 
already powerful 
Atari product line. 
ICD’s friendly, helpful staff 
is now trained in all aspects 
of support 
for the complete OSS product 
line including: 

MAC/65 

MAC/ 65 Toolkit. 

ACTION! 

ACTION! Toolkit 

BASIC XL 

BASIC XL Toolkit 

BASIC XE 

Writer’s Tool 

DOS XL 

Personal PASCAL for the 
Atari ST 
Ordering and support for 


ICD/OSS products are available 
by calling 


815/968-2228 from 8AM to SPM 
CST Monday through Friday. 
Support is also 


available 24 hours a day 7 days 


& week on the following 
Electronic 

Bulletin Boards: ICD/OSS BBS 
815/968-2229 3808-9680 baud, 
CompuServe, 

GEnie, Delphi, and BIX. ICD’s 
24 hour FAX is connected to 
815/968-6888. 

The San Jose, CA numbers for 


OSS will no longer be providing 


support. 


Orders for OSS products may be 


placed mow. All products will 

be shipping . 

in quantities soon. For:more 

information call any of our 

product support 

lines or write tos 6 py rad 

OS os 

ICD/0SS 2-2 
1226 Rock Street 
Rockford, IL 61161 


By Jeff Cleveland 


Those people who own both 
an ST and an S8-bit probably 
already Know that the ST mouse 


has the same connector as Atari 
Joysticks. So, I plugged my 
mouse into my 130XE and wrote a 
program to try to read it. 


I first tried reading it 
from the paddies ® and 1, which 


are both on port i, but got no 
reading. No matter how much I 
moved the mouse, the paddle 
values didn’t: change. That 
meant that the ST mouse is a 
digital mouse, not analog. 

I then modified the 
program to print values 
returned from the STICK 
function in Action! Cor Basic). 


The mouse didn’t return regular 
Joystick values for the eight 
directions. Instead, it 
returns a 2-bit value for each 


axis, X and Y. The X axis _ is 
in the. first two bit of the 
returned value and the Y axis 


is on the third and fourth bits 
as fol lows: 


Bit number: 87654321 

STICK results: @60@01111 
bits 1 & 2: X axis 
bits 3 & 4: Y axis 


The directign the mouse 


has been moved can be found by . 


Reading the 5T 
MOUSE On anh HE 


5 


—>? 


comparing the current reading 
with the past reading. Each 
time the mouse moves, only one 
of the bits changes value. 
Values proceed in this order: 
66 61 1118. By Knowing what 
the last value was, direction 
can then be obtained by finding 
out if the new value is above 
or below the old value. 


For example: If the stick 
function returns a1 for the Y 
axis, and the next reading 
returns a 3, then the mouse has 


been moved up, because 3 is 
above 1 in the list Cin a 
positive directiond, and up is 


a positive direction for the Y 


axis. Notice that the values 
are not in numerical order. 
This eliminates the use of an 


if--then less-than greater-than 
comparison. The following 
Action! procedure uses an array 
of numbers ‘to compare to iin 
order to find direction. 


PROC mouse() 
BYTE ARRAY mser={ 231 6 ] 
BYTE i,dx1,dx2,dy1,dy2 


dxi=STICK(@)&3 yand 
with 3 to wipe out Y bits 
dyis(STICK(@2&12> RSH 2 jwipe 


out xX bits and shift Y bits to 
X position / 
dx2=STICK( 8&3. 
reading 
dy2=(STICK(@)&12) -RSH 2 
IF dx1<¢>dx2 THEN 

i= 

WHILE dxi<>mser¢i)d DO 
sfind first reading 

[ ==4] 

OD 
IF i<>@ THEN 7 ‘ 

IF mser¢i-1>»#dx2 THEN 


;second 


PRINTC "left" 7 sput 
you left, code or proc. call 
here 

ELSE 


PRINTC"right") 4go 


ELSE 
jwraparound end of array. 
IF mser¢3)=dx2 THEN 
PRINTC"left") |  -ggo 
left again 
ELSE 
Pikisi ("right") | 390 
right again | 
FI 
FI 
FI 
IF dy1<>dy2 THEN 
check for up-down 
i= 
WHILE dyi<omser i) 00 
find first reading 
[ mas + J 
OD 
IF §<>@ THEN - 
IF mser¢i-1.#dy2 THEN 
PRINTC“up") 390 


snow 


up 
ELSE 
PRINTC "down" >) 3QoO 
down i 
FI 
ELSE 
;wraparound en: of array 
IF mser(€3)=dy2 THEN 
PRINTC"up"> : 390 
UD. 
.ELSE 
PRINTC* down") | 390 
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40 Tracks (0-39) 
18 ager ome Bey e® 720 (0-719) 
Track = Sectors 0-17 or i-18 


Track 39 = Sectors 702-719 or 703-720 : 
DOS can anly handle Sector Numbers from 0 ta 719 
Disk Drives will only accept commands for Sectors 1-720 


ya Directory 8 sectors 341-360 
VTOC - Veluee” Table of Contents 1 sector 340 
FMS - File Management Systam 3 sectors 1-3 
f07 sectors 128 Cnaracters/Sector 
Total f sectors 


DIRECTORY SECTOR - Names and Information for all files an disk-8 Sectors (341-348) 


Each Entry - 16 Bytes. 8 entries on 1 sector (16 & 8 @ 128 bytes) 
: 8 sectors $ 8 = 64 entries total 
For each Entrys 


Byte g % 3. s 3 
us ang eng i3atar H ‘ ename | 
i Byte ess sectors) i (in sectors: Sector |Sector | (primary) | or 4 
SB ‘ LSB $ MSB sors 


Bits 


VTOC - Kaeps track af which sectors are-being used - Sector 340 


Byte a ; 5 9 1¢ 99 100 
J8@ otal: § otal 3 ota reeilotai rreeiNot [sector Use MapiNot Used: 
(Byte ae Sectors! Sectors | wacae ® (Used! | y 


Sector Use Map : Byt# 10 ta Byte 99:1 
Each Bit af each Byte represents one sector an the Disk 
If the bit ts 0, then that sector is being used 
If the bit is 1, then that sector is free 
Bit 7 of byte 16 represents Sector 1, etc, ta Bit 0 af Byta 99 
which represents Sector 720 


RATA SECTORS - Saved or Listed Programs, Text files, Data Files, ets, - 128 Bytes _ 


24 = Actual Data 
27 = Sector Identity Data (Link Data) 


Byte 126 


Q=- | 
izS - 1 


Bits Se a: BS Ser Sea eS GS BS BO SS SE OE 
eRe yr TES it SRT AAT Des ooo bs cs a 
n 
iThis Sector! Next Sector af this File This Sector (0-124) | 
i 
BINARY FILE HEADER = First & bytes af First Sector 
Binary Fille Data - Created with Binary Save Options 
Byte 0 1 4 
ar ress6.otcar ress En ddreeste—n res 
! Binary File | LSB MSB LSB 
' s : 
Boat Sectors - Na Cartridge or 00S: , 
Byte 


Q Oa ress ress ress CoO reese CO 
ITraditlon!Sectors! LSB : MSB (Start Executing!Start Executing! 
| aes 2 | eee ee es a Re | ee Se. eee fl 
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Kyan Strikes Back! | 
by A Reasonably Intormed| 
Source | 
Chapter One 

WHAT HAS GONE BEFORE: 
(version 1.1) 

Along, long time ago, in @ 
galaxy tar.tar'away, KYAN 
unieashed an.Atari (8-bit) version. 
Of.KYAN:PASCAL upon an 
unsuspecting: universe, which 
soon became the most powerfui 
‘Alar! 8-bit PASCAL programming 
‘language in ‘the.cosmos. | 
« watThis PASCAL did have two 
cweaknesses;: however; which 
allowed the rebel programmers to 
‘attack It = | 

' . This-Is "the story of these 
weaknesses, and the steps that 
the KYAN empire took to counter . 
em 


* VERSION 1.1 ° , 

The two major problems with 
KYAN PASCAL V1.1 were: the 
poor manual and the lack of DOS 
accessibility, both: within the 
oe eens environment and 

om the program itself. 

These two problems made a} 
fine PASCAL programming | 
environment very difficult to work 
with. Let's take a look at what 
the problems actually were. 

* THE MANUAL ° 

As | have stated many times 
before, the KYAN PASCAL 
manual was the WORST manual 
that | have ever worked with. If 
was basically the manual for the 
Apple computer version with 
brief notes pertaining to the Atar! 
version. These notes were often 
uncléar and sometimes 
inconsistent. Typos in 
strategically located positions, 
downright incorrect information, 
and lack of actual implementation 
examples made It difficult to learn 

how to edit and compile, not to 


mention learn new Programming 
methods. 


| 
| 


The resulting trial and error | 


programming in a compiler-based 
language does not make for a 
very steep learning curve. 

When programming examples 
were given, they were usually 
either too simple or too complex 
to be of practical use. 

At one point, the Atar! 

Instructions: were so bad, | 
actuajiy had:to refer to the Apple 
section and play it by ear! 

| Allin all, the manual made the 

learning and implementation of 
PASCAL areal chore. If it ware 


not for the excellent SAM'S | 
PASCAL PRIMER (see RIACE 


REPORTER #26, “Kyan Pascal 
am's Pascal Primer”), {| don't 
think | would have gotten very far 
with PASCAL at all. 

The KYAN PASCAL manual 
Was approximately 108 pages: 
PASCAL Is a tough language to fit 
Into 108 pages. Also included 
were a few Atari-specific 
addendum pages. This was all 
bound in a clear plastic binder of 
acceptable quality. 

" DOS ACCESSIBILITY ILE 
MANIPULATION ° 


PARLEZ-VOUX PASCAL? 


(contmued trom page 7 Kyan 

PASCAL was two- 5 fold. First, 
the non-accessibility of the DOS 
commands from within the 
programming environment. To 
format a disk, lock or unlock a 
file, move a file to the ramdisk, 
or read a disk directory, you had 
to go to DOS, do what you had 
to do, and then BI NARY. LOAD 
(L) the PASCAL environment 
again. As often as | access. the 
directories, this was a pain in the 
you- kno w-w hail. 

--The othersdiftlcuity: arose 
trom the fact that there was no 
way to access directories from 
within an executing program. -As 
my programs tend to-do-a lot of 
text fila manipulation, combined 
with PASCAL:s-lack-al error 
trapping, this makes much of my 
programming unstable. 

KYAN does offer a.systems 
utilities disk that offered such 
things as disk directories, but as 
the price was approximately 
$50.00, which is what | spent for 
KY AN PASCAL in the first place, 
| couldn't bring myself to lay out 
that much money for it 
(especially with rumors of an 
upcoming update that would take 
care of many of the forenamed 
problems). 

* ODDS NDS * 

In addition to the poor manual 
and “DOS-lesness”, there were 
a few other problems that 
hindered programming with 
KYAN PASCAL, such as: 

1. KYAN PASCAL would only 
run om an 6OOXL or 130XE. if 
you had an unmoditied 800, then 
you were out of luck (although 
an upcoming 48K version was 
promised). 

2. Identifiers could not 
include an underscore character. 
The variable RATE_OF_PAY is 


much more readable than 
RATEOFPAY. 

3. KYAN PASCAL booted 
from a modified DOS 2.5, 
therefore you couldn't use a 
more powerful DOS, or use true 
double-density storage. 

4. PEEKs and POKEs were 
excluded. 

5. The GOTOXY (cursor 
positioning) procedure was left 
out. This made screen 
formatting not fun. 

41 .With the exception.of tha 
problems and: shortcomings 
mentioned, KYAN PASCAL wa: 
an exceptional value for $69.9!) 


{less through discounters)." A 
‘few other PASCALS were 


available for the:8-bit-:Atari, but 
KY AN PASCAL was:(and'still is) 
the Imperial Battlestar of 


‘PASCAL compilers: for the 


8-bitters. 
ter Two 
KYAN PASCAL ST RIKES BACK 
A while ago (quite a while - 
this article missed deadlines), | 
received notice that KYAN 
PASCAL was now updated to 
Version 2.01A, and for $24.95 
($20 for the update and $4.95 
shipping),. and the return of the 
Original V.1.1 disk, | could 
receive my update package. 
Although at first! thought that 
$24.95 was quite high for an 
update, | sent my money and 
disk. A couple of weeks later, 
my trepidation was eased 
somewhat when l received a 
new, complete KYAN PASCAL 
package. Instead of copying the 
update onto the old disk, or just 
sending a new disk, they senta 
whole, brand new package, just 
as if | had ordered a new one. 
Let’s take a look at what 
KYAN did (and didn't do) to 
improve their PASCA 


-which-is 


G@ 


* THE MANUAL II ° 

The new manual is a definite 
improvement over the old, in 
many ways 

First of all, itis now 300 
pages and is bound in an 
attractive, high-quality three ring 
binder, and Is now 
ATARI-SPECIFICI The editing 
and compiling instructions are 
much better written. 

Each chapter begins with an 
OVERVIEW. which.introduces 
the upcoming concepts. 
Following. js THE PROGRAM, 
uilt:upon ‘the related 
concepts. :-THE:LOGIC.OF THE 
PROGRAM Is a step by step 


explanation ofsthe.program. 


Thenrcomes:a few GENERAL 
COMMENTS:sfollowed by 


TOPICS FOR: PROGRAMMERS 


and. ADVANCED:TOPICS (or 
TECHNIQUES), .which introduce 
the more: refined ‘of PASCAL 
commands. Last is the 
CONCLUSION which sums up 
the pravious chapter and 
introduces the next one. 

The example programs 
supplied are much more suitable 
for learning, and do not get too 
complex too soon. : 

Although the concepts of 
PASCAL programming are better 
explained, SAM'S PASCAL 
PRIMER, or another good 
PASCAL book Is still a mus t. 

The manual’s coverage of 
including ASSEMBLY 
LANGUAGE within your 
PASCAL source code Is greatly 
expanded, although it is not 
meant as a tutorial. A good deal 
of A.L. programming experience 
is required. NOTE: a tew 
changes in A.L: co¢ge must be 


made if you wish to re-compile 
(continued on page 11) 
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code from V.1.1 on V.2.01A, 
although the changes are minor. 

The list of error messages 
has been expanded from 35 to 
141 reportable errors. 

All in all, the new manual Is 
well written and well laid out. 
The quality is first rate. It 
almost justifies the high update 
price. The amazing thing is that 
the $69.95 retail price was not 
affected. 

" NEW FEATURES/CHANGES 

KYAN PASCAL now 
includes KIX, which allows you 
access to DOS commands from 
the PASCAL programming 
environment, but unfortunately 
not from the program Itself 
(looks like I'll need to buy the 
utility disk after ca 

KIX is actually a series of 
files which can be called from 
the system prompt (which has 
been changed to %as opposed 
to the older > ). 

Following are the KIX 


commands. and what they do: 


SESE se sei 


a“ 


The Software Center 


OL A}. 


2128 Post Road Warwick #./ 
\across.trom the Airport 


-BAWMATY Lor all atari computers 


epson printer specialist's 


call 738-9800 


OPEN MONDAY - SAT. 


| SAM - SPM 
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PWD - 


(Print Working Device) 
Prints the number of the current 
default device. 

CD - (Change Device) 
Changes default drive. 

LS - (List Directory) Prints 
a to screen, printer, or a 
tile 

CAT - (Concatenate) Appends 
one or more files to a new file. 

GP - (Copy) Caples files - usa 
to move files to Ramdisk. 

MV - (Move) Renames files. 
RM - (Remove) Deletes files. 
CHMOD - (Change protection 
Mode) Locks or unlocks files. 
FORMAT - (Format disk) 


Formats a disk In either Single or 
‘enhanced density.” 


SD - (Screen Dump) Copies 
the screen contents to the 
printer. 

While working with KIX, you 
need not specify device 
numbers.: KIX will automatically 
search first the Ramdisk, then 
the user device, and then the 
default. KIX will also accept both 


lated and baba icin Wa 


TProCopy = 


You can’t backup your software | 
because copy protection locks 
you out. ProCopy is the key! 


@ Protects against the accidental loss of 
expensive software 
5 @ Works with all Atarn STs 
m @ Copies both S/S & D/S disks 
m Use with 1 or 2 disk drives 
@ Not copy protected 
@ FREE shipping and handling 
mS @ TOLL-FREE telephone number 
m@ Updates are onty $12 with return 
@ Orders shipped same day 
=m @ Disk anatyze function included 


aaa = ore ond C.0.. 


Call Call (800) 643-1223 


Send check for $34.95 (overseas Odd $2.00 for of malt) to: 


PROCO PRODUCTS 


P.O. BOX 665, CHEPACHET, RHODE 'SLAND ©2814 USA 


RAH ABH Yoo Hoxhahy YUN F | 


Avaliabdie 


min Europe 
and 
ustrolasia 


| PEEKs and POKEs~~ 


THE MOVING FINGER CO. © 
am intemationalty 2 


Southampton, $O}1-1QL Cloremor,! 


all to upper case. ey 
The anly thing lacking Is the 


ability to batch process KI» 
commands. It would make 
setting up your Ramdisk muct 
easier, for instance. 
* ODDS NDS Il ° 

A few of the minor complaint: 
have been cleared up In Versior 
2.01A. 
1. KYAN PASCAL V.2.01A wil 
now run on any 48K Atari. 
2. Underscores are nov 
accepted. 
3. It will now boot from mos 
DOSes. 
4. Two ASSEMBLY LANGUAGI! 
routines are Le hee ie alloy 
Cte) 
5. Unfortunately, GOTOXY | 
still NOT supported, but th 


manual explains. how to use th 


POSITION graphics procedur 
to position the cursor. 


Kyan Pascal wil be comtued next month 
sO siay tuned right hers on the Ri ACE 
Reporter tor Kyen Strikes Beck Part Il 
“ha esageece Informed source 
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JF DOUBLB DENSITY 
By Chuck Hoaick, ACAOC 


Many of the new disc drives available for the ATARI are double 
density and the venerable 810 can be made double density with the 
NCT Turbo modification. Double Density means that instead of the 
128 bytes of data in each sector there are 256. Practically, this 
means 253 vis 125 because of the DOS overhead of 3 bytes per 
sector. For DOS files, double density more than doubles the 
capacity. Most drives sense the density of the disc that you boot 
with and switch densities accordingly. But what if you want to 
change horses in the middle of the stream? i.e. change densities 
from within a BASIC program. This can be done easily with a 
routine that calls on the Operating System’s SIO program. I'm not 
going to give a tutorial on SIO because assembly language 
programmers should already know about it and BASIC programmers 
don’t even need to know how to spell it. (The interested reader is 
directed to the Technical User’s Notes and De Re Atari.) 


Double Density drives have two additional SIO commands that they 
respond to. These are READ and WRITE OPTION TABLE. The 
Option Table is a twelve byte table which contains information 


about the configuration of the drive. The bytes and what they 
mean are: 


Byte 0 - Number of tracks, normally 40 
Byte 1 - Head Step Rate 
0 - éms 
i - 12ms 
2 - 29ms 
3 - 30ms 
Byte 2&3 Number of sectors/track, normally 18 
Byte 4 - Number of sides, 0 for 1 
Byte 5 - Density, 0 for single, 4 for double 
Byte 6£7 Number of bytes/sector 
Byte 8 - Drive present 
0 for not on line 
1 for on line 
Byte 9 - ACIA init bits 
Byte 10&11 future use 


The protocol, established by Percom, is to first read the table, 
make changes accordingly, and write it back to the drive. Listing 1 


is a BASIC program which you can use as a guide in including a 
change density function in a BASIC program. 


Both the drive and DOS must be changed. DOS 2.0 is capable of 
communicating with either single or double density drives. If it is 
not patched for double density, you have to limit the number of 
disc files that you have open - but that is not normally a problem. 
DOS 2.0 maintains a table, starting at $1311(4881), which contains 
a density code for each drive. The code is a i for single density 
and a2 for double. Whenever the density is changed this table 


must be changed as well. Other DOSs have similar tables, but they 
may not be in the same place. 


- 


The BASIC program in Listing 1 sets up a string to accept the 


_ Option table from the drive. Lines 25 thru 60 set up the variables 


for READing from drive 1. Change the number in line 25 for a 
different drive number. Lines 70 thru 170 set up the Device 
Control Block (DCB) for the call to SIO. The call to SIO is 
contained in the USR function in line 180. This is a simple 
imbedded machine language subroutine. This is necessary because 
the operating system does not provide an entry point from BASIC. 
The USR function pushes the number of variables onto the stack on 
top of the return address. Therefore, a PLA must be executed 
before the call to SIO or at Jeast before the return to BASIC can 
be exeasted. Ut would have been easy for ATARI to have included 
a PLA before its jump to accomodate BASIC - but that’s life.) The 
rest of the program is a demonstration of actually changing the 
density. Lines 200 and 210 check the present density and branch 
to the proper change routine. The change routines change both the 
drive and DOS. The drive is changed by changing the density byte 
and the SIO control parameters to write and then looping back to 
set up the OCB and cal] SIO. DOS is changed by POKEing the new 


density value into the Drive Table, 


The concepts presented in this program can be used in any program. 
Remember to set up the DCB as shown in lines 70 thru 170, call 
SIO as in line 180, change the density, change the READ DCB bytes 


to WRITE. cali SIO again, and then POKE DOS and that’s all there 
‘s to thr 


_ 
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@ REM SAVED: DENSCONT. SAY 


1@ 


330 


340 


356 
355 
360 
365 
370 
z6e 
3930 
460 
418 
42¢@ 
436 


446 


REM Chuch Wosich, &a.C.8&.0.C. 


DIM OPTABS C12) ,QANSS CED, CrNDS C1) 
DRIVNO-LA 
oPpTass="* 7 


CHMNOS=""N**:REM M FOR READ, 


O FOR WRITE 


ROTAB—4416 

HRTAB-~GH16 
OITIREC-=ROTABI REM OR WRTAB 
SPCB-~yH#256 

POKE 0CB,49:REM DRIVE ID 
POKE OCB41,ORIVNOLREM ; 
RO. OF DRIVE TO CONTROL 
POKE 0CB4+2,aSC CCMNDS3 


POKE DCB¢Z3, DIREC 

ADTAB=ADR COPTABS) 

HI=IMT CADTAB/256) 

LO-ADTAB— CHI*256) 

POKE D0CB+4+4,LO:REM BUFFER SPACE 
POKE O0CB+¢SE,HI 

POKE 9CB4+6,12:REM 3; 

opTas$s XS 12 BYTES LONG 

POKE 0CBH*+9,@:REM JUST IM CASE 
K=USRCAOR Ch Yio". 2: REM ; 

PLA, JSR SIO,RTS 

REM LSC M,SPACE,U/C Y, 

INVERSE L/C 0,COMTROL PERIOD 
IF OPTABS (6,6) =""o* THEN 250:REM 
% MEANS SINGLE DOENSITY 

IF OPTABS(6,6)="4"* THEN ISO: REM 
4 MEANS OCOUBLE DENSITY 

? “ERROR IM READING PARAMETERS" 
END 

Li2, BORIVE 15 SINGLE DENSITY 

? “DRIVE MO. **s;DRIUMNO; 

? * TS SINGLE OENSITY’ 

? "DO YOU HMANT TO CHANGE IT; 
Ln oA | he 

INPUT ANSS 

IF QNSSCL,LI=""V"" THEN See 

EXD 

OPTAaABS (6,63 ="4"° 

DIREC=WRTAB 

CMNDS="'0" 

POKE 19%256416¢DRIVUNO,2:REM ; 
SETS 00S TO 0.0. 

GOTO 7@:END 

Lia MORIVE IS DOUBLE DENSITY! 

? “DRIVE MO. **;DRIVNO; 

? * XS DOUBLE DENSITY 

? “DO YOU WANT TO CHANGE IT °**; 
rT * — YSN ees 

INPUT ANSS 

IF ANSSCL,139=°°Y"* THEN 4006 
EXO 

OP TABS (6,6) =""e" 
DIREC-=WRTAB 

CMMOS=""O" 

POKE 19%*256¢416¢4D0RIUNO,1: REM 
SETS DOS TO $.Dd. 

GOTO 7@:END 


<), 
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CATCHING THE MOUSE AAce Fen’ 
(2ft — 2fS8 


WMrsiii §i SAU Go Jil WAvVIy 


by Gordon Billingsley 


z 
Reprinted rem Setunm, Uttar, SMugusaet i19e@7 


One of the first things most BASIC programmers noticed about ST 
BASIC was that there was no command for using the mouge, 
Fortunately, that’s not the whole story. The peeks and pokes that 
give BASIC access to the GEM interface also give programmers 
access to the mouse, 


It can be used to point, to select (with either button) or to 
provide co-ordinates for invoking other features one easy gosub 
call. GOSUB GETMOUSE -- as set up here -- tells you where the 
mouse pointer is located and whether one of the mouse buttons hag 
been depressed, 


eiteed tL 


Here is the subroutine for using.the mouse: 


10 GETMOUSE:poke control, 124 

20 poke contrl+2,0:poke contrl+6,0:vdisys (0) 
30 mx=peek (ptsout) :my=peek (pt sout+2) 

40 button=peek (Cintout) : RETURN 


The xy co-ordinates are returned in the variables mx and my. Keep 
in mind these are screen-oriented co-ordinates and not BASIC 
window-oriented co-ordinates -- that is, co-ordinated 0,0 is in 
the upper left corner of the screen, which is outside the BASIC 
window, Co-ordinates for most BASIC statements start within the 
output window, 


Mouse button presses may be detected in a variable call button, 
with values as follows: 


Ozno .button press; lzleft button pressed: 2"right button pressed. 
Here’s a short routine to demonstrate the use of GOSUB GETMOUSE 
10 gotoxy 2,5:?''Click left button to stop'' 

20 GOSUB GETMOUSE 


30 gotoxy 2,2:7'"'X=""smxe3"'Y=!"' my 
40 if button =1 then 60 


50 goto 20 

60 end 

Notice line 50. It creates an endless loop that forces the 
program to cycle through GOSUB GETMOUSE repeatedly until a 
condition that causes it to branch outside the loop is met. This 


is the sort of routine that can be used for menu selections. Your 


program won’t be doing anything else while waiting for you to make 


a menu selection, 


This little routine also is a handy programming utility. You may 
place menu items, markers or any other item on the screen then 
use this routine to identify its exact positions and boundaries. 
That comes in handy when you want the pointer to be within a 
specific range of pixels for a button press to be valid. Here’s 


15 : 
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FEEDBACK CRE CEMBER 1987 /JANUARY 1989 


an example from a game I wrote in which you could choose the 
number of players to be involved. 


280 gotoxy 4,6:?''How many players?'' 

300 HEADS=CHRS (28) +CHRS (29) :chin$=ChrS$ (30) +chr$ (31) 

320 GOTOXY 15,6:?head$:gotoxy 15,7:?CHINS | 

340 for :=1 to 2:gotoxy 14+1,8:?head$:gotoxy 144+1,9:?chin$:next |: 
380 for :=1 to 3:gotoxy 14+1,10;:?head$;:gotoxy 14+1,11:7?chin$:next 


420 for :#1 to 4:gotoxy 14+1,12:7headS:gotoxy 144+1,13:?chinS:next 


480 GOSUB GETMOUSE | 7 

S500 if (my>145) * (my< 170) * (mx >25Q0) * (mx< 275) * Cbutton=1) then players 
=l:goto 620 

520 if (my>180) * (my<205) * (butt on=1) * (mx >250) * (MX< 290) then 
players=2:goto 620 

540 if (my>215) * (My<240) * (mx >250) * (mx< 310) * Cbutton=1) then players= 
3:goto 620 

S60 if (my >247) * (my< 275) * (mx >250) * (mx< 325) * Cbutton=1) then players= 
4:goto 620 

580 if button=l1 then gotoxy 0,0:?chr$ (7) 

600 goto 480 

620 END , 


This routine uses the built in graphic face of ST BASIC as a 
graphic symbol for the number of players ina game, The mouse 
pointer and button will select one of the lines of the faces only 
if it is in the vicinity of the faces, Line S80 causes the 
internal bell to ring if you press the mouse button in a lacation 
away from the faces. A hint on using the print bell function: use 
the gotoxy command just before it. If you don’t it will scroll 
the screen up one line as if you were printing text without a 
gotoxy command. . 


Those are the basics - if you’1l excuse the pun «+ of using 
the mouse, In the next column, we’ll look at ways to jazz up your 


use of the mouse, : 
a 


Software Exchange Wanted 


| have a copy of Alpha Systems- Atari 
Software Protection Techniques with disk, 
in brand new condition, which | wish to 
exchange for the sequel- Alpha Systems 
Atari Advanced Software Protection 
Techniques with disk. | may be contacted at 
home on (049) 51-5731 or at work on (049) 


66-9317. Ask for Bill Hanna. 


g 


One caution, you can all bos 


commands with the RAM DISK EXCEPT J - 
. DUPLICATE DISK to the RAM DISK. The RAM 
' DISK has room only for 499 sectors. 


_ Therefor you can't dup either a 
BAXTER AND DUNBAR.” You didn't believe thee for a einute, | 
did you? ; 


: single 
enhanced density.disk.. Instead you 


must use the copy file command and _ take 
care that the file does not exceed the 
capacity of the RAM disk. Atari further 
cautions that if you dup the RAM DISK to 


a floppy, that floppy will be capable of 
accessing only 499 sectors. 


Que to the dynaeic nature of Deadline, there are 
several ways to end up accusing Baxter and Dunbar of the 
aurder. There are also sore puzzles to solve, but this is 
all that is necessary to put together an air-tight case 


- DEADLINE! 


against thea. 


CONGRATULATIONS! You have just solved the aystery of 


| 


| fee 


DOS 2.5 “5 
Reviewed by Steve Fabac 


The following is a review from. the 
introduction to DOS 2.5 received from 
ATARI along with the DOS 2.5 disk. It 
appears from reading the booklet, that 
you will have to order a more complete 
DOS 2.5 manual directly from Atari for 
$10 plus $2.50 for shipping and han- 
dling. : 
| As received DOS 2.5 is 

density and g0 you must 
drive to start using it. Once the disk 
is booted, you .can use the new format 
command P (FORMAT SINGLE) to format a 
disk# in single density using the 1050 
drive. Then you can use the H (WRITE 
‘poS FILES) to write DOS 2.5 in single 
density. 
| Contained on the DOS 2.5 disk is a 
file named RAMDISK.COM that automati- 
cally sets up the extra 64K of RAM in 
the 130XE as a RAM DISK. So when you 
boot DOS 2.5 on the 130XE, DOS will 
inform you that it is initializing the 
RAM DISK. It will set the extra 64K up 
as D8. And establish DUP.SYS_ and 
MEM.SAV on the RAM DISK so that the RAM 
DISK copies will be accessed (at high 


speed) rather than the floppy disk ver- 
sions. 


in ehanced 
have a'1050 


ee 


There are three new utility pro- 
grams provided on the DOS 2.5 disk: 
COPY32.COM to copy files from DOS 3.0 to 
DOS 2.5. DISKFIX.COM allows you to 
“correct some problems that may occur 
with files on DOS 2.5 and _ DOS 2.05S 
disketts." Atari also states “under cer- 
tain conditions, you can also use this 
utility to recover deleted files.” 
(How's that for not being specific? 
Sounds like they don't know what  prob- 
lems may occur or under what conditions 
you can un-delete files.) And SETUP.COM 
to allow you to change certain (again 
unspecified) DOS parameters. 

Luckely, COPY32.COM, DISKFIX.COM, 
and SETUP.COM prompt the user with brief 
instruction for their use. For more 
detailed instructions, you will have the 
order the DOS 2.5 manual from ATARI. 


Kko- Aec J ity ts 
Disk Density Control 
by Roy Nickusm 


Have you ever wondered about’ the 
Operation of a multiple density capabls¢ 
disk drive (any drive but the Atari 
810)? These drives all contain a twelve 
byte OPTION table in RAM (in the 


drive, 
not in the computer) which defines the 
current drive density. The table is 
initially configured by the default 
Switches on the drive when it is turned 
on. The next entry into the table 


occurs when a “boot” disk is loaded into 
the computer. The microprocessor in the 
disk drive is programmed to. sense the 
disk density and reconfigure the table. 

_ After the boot RRocess, then hat? 
Well, with DOS XL Oc SmartDOS or 
some of the other DOSes the reconfigure 
command will change the drive density. 
But what about control of the drive 


i ED tt os ys 
ee 


density from within.a program? It's not 
only possible, it's not even hard. 

To that end Table 1 is a descrip- 
tion of the twelve byte option table. 


Table 1, Drive Configuration 
| 


Note: All 2-byte values are in Most 
Significant Byte, Least Significant Byte 


format (the opposite of normal 6502 
practice). 


BYTE Function 


0 Number of tracks (literal value) 


1 Head step rate: 
Valu Rate 
00 : 30 msec. 
01 20 msec. 
O2-.) 12 msec. 
03 | 06 msec. 
Sectors/Track (literal value) 
18 = Singl*,or double density 
26 = Atari dual (enhanced) 
density 


4 Number of sides (Heads) 
0 = 1 side 
1 = 2 sides 


S 
= Single density TM 
= Double or Atari dual 
(enhanced) density _ 
Sector size (literal vahye) 
0,128 = Single or Atari dual 
é (enhanced) density 


1,0 = Double density 
6. Drive present _ 
00 = Drive not present 


Any other value = 


9,10,11 Future options 


These drives allow access to _ the 
option table by adding 2 new commands to 
the 5 commands the disk drive normally 
understands. Command number 78 reads 
the option table while numpec 79 writes 
4 However, some Atari 810's recog- 
nize the write option table command 
exactly like a write sector command. 


‘drive's 


Drive present 


Use this command with caution. 


Listing 1 is a short BASIC program 
which will read and write the table for 
the selected drive. Lines 


140-190 set 
up two machine language subroutines 
which will be described later. Lines 


200-290 set up the Device Control Block 
(DCB) for the disk read operation while 
lines 300-310 request the drive number 
and place it in the DCB. 

Line 320 uses the first of the 
machine language subroutines to have the 
Operating system. read the selected 
option table. Lines 330-460 
display the current table entries. 
Lines 470-670 request the new density 
and configure the DCB for a disk write 
operation to the table. Line 680 uses 
the first machine’ language’ subroutine 
again, this time to write the table. 


The drive has now been configured 
to a new density. However, one impor- 
tant task remains. Ef ett  i8:. this 


state the drive is operating in one den- 
sity while the DOS is expecting another 
density. This can lead to some confus- 
ing results. Yes, the DOS also keeps 
trash of the density. Even Atari DOS 
2.0 3 DOS sets. locations in the 
computer's RAM to indicate the density 
and allocates buffers which are sized to 
hold the disk information before and 
during transfers. ‘Eventhough the _ pro- 
grams will configure the 1050 to 
enhanced dens bye you must be using 
Atari DOS 2.5 Or you will not be able 
to access the 1050 drive. The second 
machine language subroutine (called from 
Line 690) calls the DOS initialization 
routine. This will cause DOS to inquire 
about the current drive configuration 
and configure itself accordingly. 


) Listing 1, Density Control 


REM 
REM 


*** DISK DENSITY CONTROL *** 
eee SAMPLE PROGRAM ane 
REM *** by Roy Nickum eat 
DIM BUFS$(12): REM OPTION TABLE 

DIM R$(1): REM RESPONSES GO HERE 
Z=ADR(" “):Z1=ADR(” “): REM 
JUMP TO DISK 1/0; JUMP TO DOS INIT 
DATA 104,76,89,228,104,76,224,7 
FOR I#0 TO 3 

READ X:POKE Z+I,X:NEXT I 


180 
190 
200 
210 
211 


220 
230 
240 
250 
260 


270 
280 
290 
300 
310 
320 
330 


340 
350 
360 
370 
380 
390 


400 


410 
420 


430 
440 
450 
460 


470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 


FOR I=0 TO 3 

READ X:POKE Z1+I,X:NEXT I 

DCB=768 

DATA 49,1,78,64,0,0,1,0,12,0,0,0 
REM DEVICE, UNIT, COMMAND, 
STATUS(DIR), BUFFER ADDR, TIMEOUT, 
UNUSED, # BYTES, SECTOR § 

FOR I=0 TO 1l: REM BUILD THE DCB 
RBAD X 

POKE DCB+I,X 

NEXT I , 
A=ADR(BUFS$): REM INSERT BUFFER 
ADDRESS 

X=INT(A/256) 

POKE DCB+t+5,X 

POKE DCB+4,A-X*256 

PRINT “DRIVE NUMBER"; :INPUT I 

POKE DCB+l,I: REM SET DRIVE IN DCB 
X=USR(Z): REM READ THE OPTION TABLE 
PRINT “DRIVE NUMBER OF TRACKS = "; 
PEEK(A) 

ON PEEK(A+1) GOTO 360,370,380 
X=30:GOTO 390 

X=20:GOTO 390 

X=12:GOTO 390 

X=6 

PRINT “DRIVE STEP RATE = “; X 
MSECS." 

PRINT “DRIVE SECTORS/TRACK = " 
PEEK (A+3) 

PRINT PEEK(A+4)+1; “% SIDED DRIVE" 

IF (PEEK(A+5)=0 AND PEEK(A+3)=18) 
THEN PRINT “SINGLE DENSITY“:GOTO 450 
IF (PEEK(A+5)=4 AND PEEK(A+3)=18) 
THEN PRINT “DOUBLE DENSITY":GOTO 450 
IF (PEEK(A+5)24 AND PEEK(A+3)=26) 
THEN PRINT “ENHANCED DENSITY” 

PRINT PEEK({A+6) *256+PEEK(A+7); " 
BYTES/SECTOR* 

PRINT “Make it single (S), enhanced 
4#E),":PRINT “or double (D) density"; 
INPUT RS ; | 

IF ASC(RS)=ASC("D") THEN 570 


« 
, 


e 
’ 


IF ASC(RS)=ASC("E") THEN 620 


IF ASC(RS)=ASC("S") THEN 520 

GOTO 460 

POKE A+5,0: REM MAKE SINGLE DENSITY 
POKE A+3,18 | 

POKE A+6,0 

POKE A+7,128 

GOTO 660. | | 

POKE A+5,4: REM MAKE DOUBLE DENSITY 
POKE A+3,18 7 
POKE A+6,1 

POKE A+7,0 

GOTO 660 


@ 


620 POKE A+5,4: REM MAKE ENHANCED DEN- 
SITY 7 

630 POKE A+3,26 

640 POKE A+6,0 , 

650 POKE A+7,128 

660 POKE DCB+3,128: REM SET DIRECTION 
FOR WRITE 

670 POKE DCB+2,79: REM SET COMMAND 
(WRITE) | 

680 X=USR(Z)/: REM UPDATE DRIVE OPTIONS 

690 X=USR(Z1): REM UPDATE DOS 

700 END 
For those who want the same. func- 

tionality without the need for interac- 

tion, Listing 2 will set up a machine 

language subroutine which will, depend- 

ing on how it is’ called, read the’ table 


Or read and write the table. If called 
as: 


| 
X=USR(ADR(D$), #D) 


The option table will be 
will be returned as: 


read and “*X" 


CHR$(X)="S" for single density 
"E* for Atari dual 

(enhanced) density 

"D" for double density. 


If called as: 


X=USR(ADR($D),§D, Density) 


the option table will be read then writ- 
ten with the new density. This is fol- 
lowed by a reinitialization of DOS (to 
keep communication straight). “X" will 
be returned with the density prior to. 
reconfiguration. | 

Now you have the last word in 
control of the drive's density. 


the 


Listing 2, "USR" Density Control 


10 REM DRIVE DENSITY USR FUNCTION 
. 20 REM by Roy Nickum; 20 June, 1895 


30 REM TO READ DENSITY: 
31 REM X=USR(ADR(DS),#€D) 
32 REM #D=DRIVE NUMBER 
33 REM RETURNS X AS: 

34 REM ASC(DENSITY) 


s 


35 REM 


| 37 REM 
38 REM 
40 REM 
41 REM 
42 REM 
43 REM 
44 REM 
50 DIM 
60 FOR 


70 READ DATA | 
80 POKE ADR(D$)+I-1, DATA ° 
90 NEXT I 
1000 DATA 104,133,203, 104,104, F4i,1,3; 


1010 
1020 


. 1030 


1040 
1050 
1060 
1070 
1080 


1090 


1100 
1110 
1120 
1130 


1140 
1150 
1160 
1170 


ments in listing 2. 


2 


4 


10 


20 
30 
40 


169,49 


DENSITY= 
36 REM “S" FOR SINGLE 

"E" FOR ENHANCED 1050 

"D" FOR DOUBLE 

TO WRITE DENSITY: 
X=USR(ADR(D$),#D,DENSITY) 
#D & DENSITY AS ABOVE 
RETURNS X AS DENSITY PRIOR 
TO RECONFIGURATION 

D$(178) 
I=l1 TO 178 


DATA 141,0,3,169, 78,141, 2,3,169,64 
DATA 141,3,3,169,0, 141, 4,3,169,4 
DATA 141,5,3,169,1,141,6,3,169,12 
DATA 141,8,3,169,0,141,9,3,32,89 
DATA 228,173,5,4,201,0,208,4,169,83 
DATA 80,24,173,6,4,201,1,208,4,169 
DATA 68,80,13,173,3,4,201,26,208,4 
DATA 169,69,80,2,169,85,133,212, 


169,0 


DATA 133,213,165,203,201,2, 240,1, 


96,169 


DATA 79,141,2,3,169,128,141, 3,3,141 
DATA 179,6,169,0,141,5,4, 141,6,4 
DATA 141,10,3,141,11,3,169,18, 141,3 
DATA 4,104, 104,201,83,240,34,201, 


68,208 


DATA 16,162,0,142,7,4,232,142, 6,4 
DATA 162,4,142,5,4,80,14,201, 69,208 
DATA 16,162,4,142,5,4,162, 26,142,3 
DATA 4,32,89,228,32,224,7,96 


“é 


The following is the machine 
language source code for the data state- 


2 


$0400 


‘BUFFER=$400 


BUFFER 

= 
-PLA 
STA 
PLA 
PLA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 


$0600 


203 


769 
#49 
768 
#78 
770 
#64 © 
771 


: ASSIGN 


;ORG FOR ASSEMBLY 
*GET NUMBER ARG 
*;SAVE NO. OF ARG 


7LO BYTE OF ARG 
*SAVE DRIVE NUMBER 
*;SET AS DISK 
;DEVICE CODE 

7SET READ CONFG. 
7;DCB COMMAND 
*;DIRECTION = READ 


0130 
0140 
0150 
0160 
0170 
0180 
0190 
0200 
0210 
0220 
0230 


0240 
0250 
0260 
0270 
0280 
0290 
0300 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 
0390 
0400 
0410 
0420 
0430 
0440 
0450 
0460 
0470 
0480 
0490 
0500 
0510 
0520 
0530 
0540 


0550 


0560 
0570 
0580 
0590 
0600 
0610 
0620 
0630 
0640 
0650 
0660 


0670 


LDA # <BUFFER:LO-BYTE 
STA 772 
LDA # >BUFFER;HI-BYTE 
STA 773 :POINTER TO BUFF 
LDA #1 ;SHORT TIMEOUT 
STA 774 
LDA #12 ;BUFFER = 12 BYTE 
STA 776 
LDA #0 
STA 777 ;LENGTH OF BUFFER 
JSR $E459 :USE OS TO READ 
;DRIVE CONFG. 
LDA BUFFER+S ;DENSITY STATUS 
CMP #0 ;IS DENSITY SNGL? 
BNE DOUBLE =;NO, IS DOUBLE 
LDA #83 7YES, "S" FOR 
BVC WRITE.TEST ;RETURN TO BASIC 
DOUBLE 
LDA BUFFER+6 
CMP #1 ;IS IT DOUBLE? 
BNE ENHANCED ;:NO 
LDA #68 7YES, SET “p* 
BVC WRITE.TEST 
ENHANCED 
LDA BUFFER+3 
CMP #26 :IS IT ENHANCED? 
BNE UNKNOWN :NO 
LDA #69 ;YES, “E* 
BVC WRITE.TEST 
UNKNOWN ; UNKNOWN RESPONSE 
LDA #85 7"U" TYPE 
WRITE.TEST | 
STA 212 ; LO-BYTE 
LDA #0 
STA 213 ;HI-BYTE 
LDA 203 ;CHECK NO. ARG 
CMP #2 ;WRITE REQUEST? 
BEQ WRITE 7YES, DO WRITE 
EXIT :NO, SO RETURN TO 
RTS ;BASIC 
WRITE 7 
LDA #79 3SET WRITE CONFG. 
STA 770 
LDA #128 ;CMD = WRITE 
STA 771 | 
STA BUFFER+7 ;SET SINGLE DNSTY 
LDA ¢0 ;AS DEFAULT MODE 
STA BUFFER+5 
STA BUFFER+6 
STA 778 
STA 779 
LDA #18 
STA BUFFER+3 . 
PLA :GET DENSITY PROM 
PLA :STACK NEXT 
CMP #483 >"S*? 


© 


cd 


0680 BEQ WRITEIT ;YES, WRITE SNGL 


0690 CMP #68 ;"D"? 
0700 BNE ENHANCED?;NO, CHECK IF “E" 
0710 LDX #0 >YES, SET DOUBLE 
0720 STX BUFFER+7 ;DENSITY CONFIG 
0730 INX 
0740 STX BUFFER+6 
0750 LDX #4 
0760 STX BUFFER+5 
0770 BVC WRITEIT ;DO IT 
0780 ENHANCED? ; 
0790 CMP #69 <t5 IT “2* 
0800 .BNE EXIT2 :NO, NOT E 
0810 - LDX $4 ;SET ENHANCED 
0820 STX BUFFER+5 ;DENSITY MODE 
0830 LDX #26 
0840 STX BUFFER+3 
0850 WRITEIT 
0860 JSR $E459 . :RE CONFIG DRIVE 
0870 JSR $07E0 sRE-INITIALIZE DOS 
0880 EXIT2 >TO NEW CONFIG 
0890 RTS | 
; 
FOR SALE 
Call Larry Jordan 
765-4627 © 


Atari CX85 Numeric Key Pads. New in 


boxes with schematics, documentation and 
device handlers. 


$15.00 


IN MY OPINION 
By Larry Jordan 


Some members of our group who have 
purchased SWP's ATR-8000 interface and 
CPM compatible computer have recently 
conveyed to me a surprising lack of sup- 
port from SWP in that when they call SwP 
long distance to either ask questions or 
point out problems they get little if 
any aid for their problems. SWP either 


pleads ignorance of the software that it 


promotes and sells or in two particular 
cases merely hangs up on you. 

| Such support for the customer would 
certainly .not indicate to me that SWP 
has any long range plans to continue’ to 
try and sell their product to the ATARI 
using public. One specific case in 
point is the promotion thru SWP's 


newsletter of a “new" version of My-Dos 


@ 


which they are actively trying to sell 
when indeed there is in fact a more 
advanced version’ available in the 
software stores for the same price. when 
SWP was asked about this they replied 
that. they had no knowledge of the other 
version. When the point was made about 
they're being My-Dos'‘s largest customer 
- who should be able to wield some 
influence with My-Dos - they simply hung 
up the phone. Is this the response one 
would expect from a company that you 
have spent hundreds of dollars with? 

I for one would urge that SWP exam- 
ine its customer support attitude and 
make any needed changes’ forthwith. Tt 
would seem to me that any,time one asks 
a question about-~ using bate product 


} 


' 


they claim ignorance of the software 
which they require you to use to utilize 
their product - kind of a catch 22. If 
they are indeed so ignorant of this 
software, why continue to sell it? 

While I have not been praising SWP 
thus far let me add that what makes this 
a truly sad situation is that they make 
- as far as I am concerned - probably 
the most useful product available for 
the Atari computer user. I myself 
bought a 16 K version in lieu of an 
Atari 850 interface to enable me to use 
a printer and modem. However, without 

the My-Dos RS-232 handler it was of no 
use in using my modem. Additionaly, 
when I purchased my unit.- which is no 
longer available - no dos was’ supplied 
with it. Now one must buy the 64K unit 
and it does come with the software. 

In closing let me say that all in 
all I feel that SWP makes a great pro- 
duct but needs to examine its customer 
relations policy. The idea of tying 
themselves to a particular dos manufac- 
turer seems to have put them at My-Dos'‘s 
mercy. _The only other dos which to my 
knowledge supports the ATR user is 
Sparta Dos and it is not compatible with 


any other dos‘'s. If anyone knows of any 


other dos that supports the ATR RS-232 
port please let me know. 


me fe but ohio 
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BASIC DVNARIC DENSITY cHangeR  2CEBERE” FAC? 
by Howard Forsberg 3- £¢ 


After reading the "INSIGHT:Atari® series of articles on the S10 call and Percom Config Block, 1 quickly typed 
in the Config Block Modifier. I knew that this was finally the answer to ay probleas of having to reboot ay systea 
every tiee I wanted to access both single and double density disks with the saee BASIC progras. But, alas, ay 
hopes for a solution had only partially been realized. The program could still only process one density at a tise 
dynasically. To change densities still required the pressing of the “RESET” key in order for the change to take 
effect. 

This was better than rebooting with the systea, but still wasn’t making the change dynamically. I knew that 
sachine language prograas could sake the change, but I wanted this to be done froe BASIC. 

One night I decided to detersine exactly what had to be done in order to aake the density change totally 
dynasic within a BASIC progras. I got out ay “Inside Atari DOS", “Mapping the Atari“, and the series of articles 
on SIO frow “Compute eagazine and went to work. After about two and a half hours of reading, trying, peeking, and 
poking, I had deterained there were about 3 or 4 different places that were referenced during disk [/0 that had to 
do with density. 7 

After booting the systes in single density, I ran the Config Block Change routine to set the disk up for 
double density. Then, I poked in the values I had decided would sake the systea access the disk as double density. 
When [ tried to list the prograe to a preforsatted double density disk, it worked. Now all [ had to do is to 
decide what really needed to be done, and what the systes would handle for ae. 

After a little sore trial and error, J] case up with just two pokes that needed to be sade. The first was at 
dec. 768, Which was in the coasand string for the config block change. After returning from the change, it needed 
to be poked with a “1°. The other was in a byte called DRVTBL, which is set up by the DOS during initialization. 
The location is dec. 4881 for drive 1. The value is either a “1° or "2° for single or double density. That was 
all that was required, everything else was changed by the systes. 

Well, I was feeling kind of proud of ayself, but was starting to wonder about “Why” this was happening. | 
still didn’t know if it was a fluke, or something I could rely on happening every tiae. So it was back to the 
books. After about 4 or 7 aore hours of reading, I believe I know why. This is a brief explanation of what is 
happening. 

Quring the “boot® process, boot sector “1° is copied into sesory starting at $700. At address $78A is the 
DRYBYT, which identifies the drive as a "1" or "2" for single or double density. FAS initialization copies the 
DRVBYT to the DRVTBL displacesent for the drive nuaber being used. The Atari 00S uses a routine called “SETUP® to 
set up the FAS control cells for all comaands ta access disk files (including disk initialization). The setup 
routine copies the Drive Type into the ORVTYP byte froe the ORVTBL displacement for that drive number. The setup 
routine then sets up all the fields needed to access the disk based on the DRVTYP value. By poking the new value 
for the Drive type into the DRVTBL displacesent before executing any 1/0 coaaands, 005 sets up the new values 
during the next pass through the "SETUP* routine. 

I have used this process for cataloging ay disks, and creating labels for thea. My BASIC prograes both 
autoaatically change densities and continue processing by using this routine. I have condensed the routine as auch 
possible, because ay catalog prograe keeps the entire disk library in aeaory. The addition of this routine only 
caused a loss of 4% of the total nuaber of records available. The routine will read the config block and change to 
the other density every tise it is called. 

The breakdown of the routine is like this. Line one disensions the strings and initializes thea for 
nonvariable values. DRV$ is the device number and can be changed if other drives are to be accessed. If another 
drive is used, the ORVTBL displacement also changes. The poke addresses on line 29388 aust reflect the new 
displacement (ex. drive 3 would be address 4883). Line 29808 is the first call that reads the current 
configuration for the device. If an error code greater than 127 occurs than the prograa stops. The probles with 
the drive was not density. The next two lines switch the density froe the one read. Line 29288 sets up the write 
and when returned to, also stops if the error was not a density probles. Line 29388 pokes the required values to 
into 768 and ORVTBL so the change will take affect without a "RESET® and returns to the basic progras. 

To use the routine, add line one to the front of your progras. Set a trap to 298868 before you access the 
disk. You aay want to Peek 195 for a error 144 before continuing. When a disk error occurs, the routine will 
reset the density for both the drive and the systes. You will need to close the [0CB on line 29218 before 
returning to the line that does the open. 

One other fact that needs to be sentioned is that this routine will work when it is loaded with Atari 00S. | 
have tried it when loaded froa MYDOS, and it does not work. I haven't tried it with any other versions, so I don't 
know if they will work or not. I feel like the reason for this problea is that the other versions have sovec the 
displaceaent for the DRVTBL. | 
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BASIC DYNAMIC DENSITY CHANGER 
by Howard Forsberg, 


This routine allows the DYNAMIC changing of density within | , . : 
Pye ing figs acd qing y a BASIC prograe. There is no need to press "RESET 

Line ane disensions the strings and initializes thea for nonvariable values. DRVS is the device nusber and 
can be changed if other drives are to be accessed. If another drive is used, the pokes on line 2938@ need to 
reflect the new displacesent of ORVTBL. For exaaple, if drive 3 were used, the poke address would be 4883. Line 
790068 is the first call that reads the current configuration for the device. If an error cade greater than 127 
occurs than the prograe stops. The problee with the drive was not density. The next two lines switch the density 
froa the one read. Line 29280 sets up the write and when returned ta, also stops if the error was not a density 
problea. Line 29300 pokes the required values to into 768 and ORVTBL so the change will take affect without a 
“RESET and returns to the basic prograe. 

To use the routine, add line one to the front of your progras. Set a trap to 29008 before you access the 
disk. You ay want to Peek 195 for a error 144 before continuing. When a disk error occurs, the routine will 
reset the density for both the drive and the systee. You will need to close the IOCB on line 29318 before 
returning to the line that does the open. 

One other fact that needs to be sentioned is that this routine will work when it is loaded with Atari 00S. | 
have tried it when loaded from MYDOS, and it does not work. I haven't tried it with any other versions, so I don't 


know if they will work or not. I feel like the reason for this problea is that the other versions have aoved the 
displacesent for the DRVTBL. 
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‘.s DIM TS8L$ C123 ,CMDS CL) , CALS C143 :CALS="h YH! 4 “EBIwIUe:’:: orv=1 
2960@ TSBL—ADR CTBLS$? : ADDR=TBL: CMDS=—"N°':GOSUB 29500: 0EN=PEEK CT 
BL+53:XF S$STLA27? THEN STOP | 

29100 IF DEN-—4 THEN DOEFN—@2:BPS-—-126:GO0OTO 2928ee 

2912@ DEN-—4:B8P53-256 

29200 GOSUB 29406: IF SST? 127 THEN STOP. 

2930@ POKE 768, 1:POKEF 48681,2:IKF OEFN=-G@ THEN POKE 4881,1 

29310 RETURN 

294008 TBL=ADRCTBLS? :ADDR-=TBL:POKE TSL+S,DEN:POKE TSBL4+6,INTCS 
PS/256)3 :POKE TSL+7,B8P5-PEFEK CTBL4+63 #256 : CMDS="'0O°** 

295@0@ POKE 766,85C C*°1°°3} :POKE 769,0RVUI1POKE 7706, Aa85C CCMDS$) :POKE 
771,120: XF CMDS=—""N** THEM POKE 771,64 

29510 POKE 773, INT CADORSI2Z256) :POKE 772, ADDR-Z2S5S6™¢PEEK C7733 : POK 
E 774,3:POKE 775,@0:POKE 776,12: POKE 777,20 

2952@ SST-—USR CADRCCAL S$} 3 : RETURN 
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DISK DRIVE INTERFACE (via SIO) 
Contributed by Bruce Blake 


This article contains information and data from the MYDOS 3.05 Manual, the ATARI Technical Reference Notes, and 
he ARCHIVER/EDITOR User’s Manual. 


The physical disk drives and diskettes are external to the ATARI hore computers and are noraally attached to the 
serial interface connector" on the right side of the coaputer. The software in the operating system (0S ROMs) that 
ccess the devices attached to the serial interface connector is called the “serial I/0 driver® or SIO for short. The 
sperating systea uses this driver to pass all commands and inforaation to and from the disk drive and other 


eriferals, | Several coaands were defined by ATARI to comaunicate with the 810 disk drive, but an extended set of 
commands is required to support double density functions. 
The siniaue set of disk drive functions are: 


Device Unit Command Direction Byte Ct. Aux. Bytes Function 
$31 Drivef $21 ' Fro Drive 128/256 1 to 720 FORMAT DISK 
$31 Drived $50 P To Drive 128/256 1 to 720 WRITE (no verify) 
$31 Drive? $52 R Froe Drive 128/256 1 to 720 READ 
5 $31 ODriveé $53 S From Drive 4 1 to 720 READ STATUS 
$31 =Drived $57 4 To Drive 128/256 1 to 720 WRITE (verify) 


Except for the STATUS and CONFIGURE commands, the byte count is always 128 for a seall sector drive, and is 128 
for the first three sectors (1, 2, and 3) of a large sector drive. Al] other sectors on a large sector drive are 256 
bytes long. 

The first byte returned by the READ STATUS command is expected to indicate the sector size. If bit 5 is a1 then 
the sectors are large (256 bytes), otherwise, they are smal] (128 bytes). Bit 3 of this byte will indicate if the 
disk is write protected or not. If bit 3 is a 1 then the disk is write protected. It seems that bit 4 will indicate 
if the disk drive is configurable or not. If bit 4 is set the drive is configurable as single or double density. 


Status Request Data First Byte 


$00, $FF, $E0, $00 SD WP Off ATARI 810 Only 
$08, $FF, $E0, $00 SD WP On ATARI 810 Only 
$10, $FF,$E0, $00 SD WP Off 

$30) FF, $E0, $00 DD WP Off 

$19, $FF, $£0, $00 SD WP On 

$38, SFF, $€0, $00 DD WP On 


Eyte two of the floppy disk Controler status byte. A low bit indicates the error exists. | 


Bit Read Write Notes 

7 Not Ready Not Ready Always Clear 

6 Data Error #1 Write Protect : 

5 Data Error $2 Write Fault 

4 Record Not Found Record Not Found Sector Missing 

3 CRC Error CRC Error 

2 Lost Data Lost Data Should Not Happen 
| DRQ DRQ Always Clear 

0 Busy Busy Always Clear 


Byte three is the nuaber of seconds required to foraat a disk. 
Byte four is not used. 


The new comeands added are: 


Device Unit Command Direction Byte Ct. Aux. Bytes Function 


$31 Driveé $4EN From Drive 12 1 to 720 READ Configuration 
ut frive® ¢4F 1 To Drive 17 1 ta 726 


WRITE Configuration 


_—™ 
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¢ These comeands pereit reconfiguration of a disk drive on 
deaand, These cosaands also support identification of a disk 
drive as single or double density, 5 or 8 inch and one ofr two 
sided. The individual bytes are defined as follows: 

byte 0: Tracks per side (40 for a standard disk drive) 

byte 1: Disk Drive Step Rate (as defined by Western Digital) 


Code value 68 inch rate ) 1/4 inch rate 
0 3 as/track & as/track 
1 | 6 as/track 12 as/track 
2 10 as/track 20 as/track 
3 15 as/track 30 as/track 


byte 2: Zero (high byte of sectors/track) 
byte 3: Sectors/Track (18 for standard diskettes) 
byte 4: Side Code (O=single sided, i=double sided) 
byte 5: Disk Type Code -- : 
bit 2: O=single density, l=double density 
bit 1: 0=5 1/4 inch diskette, 1=8 inch diskette drive 
byte 6: High byte of Bytes/Sector (0 for ATARI 810 compatible) 
byte 7: Low byte of Bytes/Sector (128 for ATARI 810) 
byte 8: Translation control -- (Not valid on TRAK AT-D2) 
bit 7: 1=40 trk. disk [/0 on an 80 trk. drive 
bit 6: Always 1 (to indicate drive present) 
bit 1: i=Handle sectors 1, 2, and 3 as full size sectors 
bit 0: 1=Sectors nueber 0-17 (for exaaple) not 1-18 
€ bytes 9-11 are not used (and should be zero) 


Send Configure Comeand Data 
SD 40,0,0,18,0,0,$0,$80,1,0,0,0 
DD 40,0,0,18,0,4,$1,$00,1,0,0,0 


Recieve Drive Configuration Data 
SD 40,3,0,18,0,0,$0, $80, SFF, $FF, SFF, $FF 
DD 40,3,0,18,0,4,$1, $00, $FF, SFF, SEF, SFF 


An additional requirement is that the disk : drive 
automatically switch density if required to read sector 1. This 


is necessary if one is to BOOT’ either single or double density 
disks, 


The following program will let you interrogate and configure 
your disk drives 


10 REM 66 LECCE IDDDDIDDDDIDD 
20 REM <<< PERCOM DISK CONTROL >>> 
30 REM <<< SAMPLE PROGRAN =>) 
40 REM <<: >») 
50 REN <<< —sUPDATED BY —+>? 

REM ((< BRUCE BLAKE —»>? 
70 REM 6EKCCECEKCCODDDDDDIDDPD? 
100 DIM BUFS‘12):REM OPTION TABLE 
110 DIN RS(1)2REN RESPONSES GO HERE 
120 Z=ADR(*1234") 


'euc a | 
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130 DATA 104, 76,89, 228 
140 RESTORE 130:FOR 1=0 TO 3 
150 READ XPOKE Z+1,X:NEXT | 
160 DCB=768: DRIVE=1 
170 DATA 49,1, 78,64,0,0,1,0,12,0,1,0 
180 REM DEVICE, UNIT, COMMAND, STATUS(DIR), 
190 REM BUFFER ADDR, TINEOUT,SECTOR ADDR 
200 RESTORE 170:FOR I=0 TO 11:REM BUILD THE DCB 
210 READ X;POKE DCB+I, X:NEXT I 
220 A=ADR(BUFS$):REM INSERT BUFFER ADDRESS 
230 X=INT(A/256):POKE DCB+S, X:POKE DCB+4, A-X#256 
240 TRAP 250:PRINT CHRS$(125):PRINT “Drive 
Nueber";: INPUT DRIVE 
250 TRAP 45678: POKE DCB+1,DRIVESREM SET DRIVE IN DCB 
260 X=USR(Z):REM READ THE OPTION TABLE 
270 IF PEEK(DCB+3)<>1 THEN PRINT ‘Drive NOT 
Configurable*:G0SUB 590: END 
280 PRINT ° Nuaber of Tracks=";PEEK(A) 
290 PRINT ° Step Rate Code="5PEEK(A+1) 
300 PRINT * Sectors/Track="3PEEK (A+3) 
310 PRINT ° *SPEEK(A+4)415" Sided Drive® 
320 IF PEEK(A#S)=0 THEN PRINT ° Single 
Density®:G0T0 340 
330 IF PEEK(A+S)=4 THEN PRINT ° Double Density* 
340 PRINT ° ";PEEK (A+6) #2564+PEEK (A+7) 5" 
Bytes/Sector “ 
360 PRINT :PRINT “Make it Single or Double density °; 
370 INPUT R$ 
380 DATA 49,1,79,128,0,0,1,0,12,0,1,0 
370 RESTORE 380:FOR I=0 TO 11:REM BUILD THE DCB 
400 READ X:POKE DCB+I,X:NEXT I 
410 IF R$="D° THEN 460 
420 POKE A+5,0:> "Make Drive Single Density": PRINT 
430 POKE A+6,0 
440 POKE A+7,128 
450 GOTO 490 
460 POKE A+5,4:° “Make Drive Double Density’: PRINT 
470 POKE A+é,1 
480 POKE A+7,0 
490 A=ADR(BUFS):REM INSERT BUFFER ADDRESS 
900 X=INT(A/256) SPOKE DCB+5, X:POKE DCB+4,A-X#256 
510 POKE DCB+1,DRIVESREM SET DRIVE IN DCB 
20 X=USR(Z):REM UPDATE DRIVE OPTIONS 
200 IF PEEK(DCB+3).°>1 THEN PRINT “Drive Update 
Error": 6010 550 
540 GOSUB 590 
350 DATA 104,76,224,7 
360 RESTORE 550:FOR I=0 TO 3 
576 READ X:POKE Z+I,X:NEXT I 
980 X=USR(Z)°END © REM UPDATE DOS 
590 DATA 49,1,83,64,0,0,1,0,4,0,1,0 
600 REM DEVICE, UNIT, COMMAND, STATUS(DIR), 
610 REM BUFFER ADDR, TIMEQUT,SECTOR ADDR 
620 RESTORE S90:FOR [=0 TO 11:REM BUILD THE DCB 
650 READ X:POKE DCB+l,YSNEXT | 
640 A=ADR(RUFS$):REM INSERT BUFFER ADDRESS 
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30 DATA 104, 76,89, 228 

i4u RESTORE 130:FOR I=0 TO 3 

15) READ X:POKE Z+1,X:NEXT I 

& DCB=768: DRIVE=1 

;” DATA 45,1,78,64,0,0,1,0,12,0,1,0 

:3) REM DEVICE, UNIT, COMMAND, STATUS(DIR), 

120 REM BUFFER ADDR, TIMEQUT,SECTOR ADDR 

ZH) RESTORE” 170:FOR 1=0 TO 11:REM BUILD THE DCB 

710 READ X:POKE DCB+I,X:NEXT I 

“2G AZADR(BUFS)SREM INSERT BUFFER ADDRESS 

230 YSINT(A/256) SPOKE DCB+5, X3POKE DCB+4,A-X#256 

250 TRAP 250:PRINT CHRS$(125)3PRINT “Drive Nuaber";: INPUT 
DRIVE 

250 TRAP 45678:POKE DCB+1,DRIVE:REM SET DRIVE IN DCB 
Zod X=USRiZ)EREM READ THE OPTION TABLE 

270)~=—Oo JF) PEEK(DCB#3)<31 THEN PRINT “Drive NOT 
Conéigurable":GOSUB 590: END 

250 PRINT “ Nuaber of Tracks=";PEEKIA) 
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0100 SPPSSHSSSEEHSSEEHESESHOEHCEHOCHE OS 

0110 §##A ROUTINE FOR STORING RAM ON ## 

0120 3##A DISK OR FOR READING IT BACKee 

0130 ;##BY ANDREW LIEBERMAN 7/10/€2 ¢¢ 

O1L40 fHeeReeesesesaeesneEeseaeeeseedase 

0150 NUMSEC=#8600 {NUMBER OF SECTORS STIIL TO BE DONE 
0160 DUNIT=$301 {WHICH DRIVE?(1-4) 

0170 DCOMD=$302 {$52=READ, $572WRITE 

0180 DBUFLO=$304 ;POINTER FOR LO BYTE OF RAM 

0190 DBUFHI=$305 {POINTER FOR HI BYTE OF RAM 

0200 DAUXLO=830A;POINTER FOR LO BYTE OF SECTOR 

0210 DAUXHI=t30B;POINTER FOR HI BYTE OF SECTOR 

0220 #=¢650 

0230 sTHE USR COMMAND PLACES DATA ON THE STACK 
0240 } THIS PART OF THE PROGRAM PULLS THE DATA OFF AND 
PUTS IT IN THE 

0250 ;PROPER MEMORY LOCATIONS 

0260 PLA ;WE DON’T CARE ABOUT THIS 

0270 PLA 

0280 STA DBUFHI 

0290 PLA 

0300 STA DBUFLO 

0310 PLA 

0320 STA DAUXHI 

0330 PLA 

0340 STA DAUXLO 

0350 PLA ;THIS IS ASSUMED TO BE 0 

0360 PLA 

0370 STA NUMSEC 

0380 PLA ;THIS IS ASSUMED TO BE 0 

0390 PLA 

0400 STA DCOMD 

0410 LDA #$01 ;ASSUME DRIVE #1 

0420 STA DUNIT 

0430 LOOP DEC NUMSEC ;ONE LESS SECTOR TO BE DONE 
0440 BMI END ;sIF MINUS RESULT, LAST SECTOR WAS 0, SO 
BRANCH TO END 

0450 JSR $E453 ;THIS IS THE O.S. SUBROUTINE THAT DOES ALL 
THE WORK 

04690 CLC 

0470 INC DAUXLO jINCREMENT SECTOR POINTER 

0430 BCC SKIPi ;CHECK FOR CARRY 

0490 INC DAUXHI :THERE WAS A CARRY SO HI BYTE IS 
INCREMENTED 


0500 SKIP1 LDA DBUFLO ;SINCE EACH SECTOR IS $80 BYTES 
LONG, THE 

0510 CLC ;RAM POINTER, DBUF, MUST BE INCREMENTED BY $80 
0520 ADC #880 ;ADD $80 TO LO BYTE 

0530 BVC SKIP2 ;IF IT DIDN’T OVERFLOW EVERYTHING'S O.K. 
03540 INC DBUFHI {LO BYTE OVERFLOWED, SO INCREMENT HI 
BYTE 

0550 SKIP2 STA DBUFLO ;DON‘T FORGET TO STORE THE LO BYTE 


0360 CLC {A JUMP DONE THIS WAY MAKES THE PROGRAM 
RELOCATABLE IN RAM 


0370 BCC LOOP 
0580 END RTS ;ALL DONE 
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AJOYSTICK XL/XE 


(Reprint: A-Bug, June, 1986, Boston Computer Society) 

When the Atari 1200XL appeared, one criticism was the new 
machine has only two joystick ports, rather than the four ports 
featured by the earlier 400 and 800 machines. This limitation is 
also present in all the newer Atari machines. Owners of these 
machines cannot play games intended for more than two players 
— until now! 

The interface described in this article allows you to connect 
four joysticks to your XL or XE machine. With the software included; 
it is compatible with most programs intended for the earlier 
computers. The interface plugs into the joystick ports and requires 
no modification to your computer. 

How the Interface Works 

Lines 1 and 2 of joystick port 2 are programmed as outputs 
and used to select one of the four input jacks. The modified 
operating system outputs each of the four port addresses in turn. 
The data selectors in the interface connect the appropriate inputs 
to joystick port 1; the OS reads them from there. The stick values 
are put into the expected memory locations, so the interface is 
compatible with most software. Paddle inputs are connected 
directly from input ports 1 and 2 to the corresponding ports of the 
computer and are scanned normally 

Building the Interface 
' The schematic diagram and suggested board layout appear in 
Figure 1. The terminal points shown in the diagram are connected 


to pins of the connector plugs and jacks as indicated. Parts list: 
IC1: 74LS21 


IC 2-4: 74LS153 

C1: 22 uf tantalum 

C2-5: .1 uf monolithic ceramic 

C6-32: .001 uf monolithic ceramic 

R1-27: 220 ohm,% watt 
J1-4: DBOP 
P1-2: OB9S 


The Software 

The software for the interface (Listing 1) modifies the Revision 
B operating system found on the Translator Disk. It changes the 
joystick scanning code to work with the interface. It will work with 
either side of the Atari Translator disk, the Fix XL from Antic, of 
the Home-Made Translator from Analog. The Basic program creates 
an AUTORUN:SYS file. Put it on a disk with DOS. This is the 4-port 
handler disk. 

lf you have the Home-Made Translator, you can make a disk 
for use With the interface which boots in one step. Boot the HM 
Translator, then the handler disk. Load the Basic program which 
creates the HM Translator and run it 

How to Use the Interface 


To run programs with the 4-joystick interface, boot your 


Translator (with Basic enabled or disabled, as needed), then boot 

the 4-port handler disk. Next insert your program disk and press 

Seiect. Plug the interface into the joystick ports of your machine, 

and plug joysticks or other compatible controllers into the interface 
Limitations 

Some programs will not work with this 4-joystick interface. 
Possible problems: 

Reading the ports directly. This is usually done only for devices 
other than joysticks. 

Changing any of the port lines to outputs. Devices which 
require this include keyboard controllers (NOT the CX85 numeric 
keypad), MPP modems, and printer interfaces. 

Devices using the paddle inputs (paddies, CX85 keypad) will 
only work in the first two ports. 

Any software which will not run with the OS in RAM. This is 
usually caused by protection schemes, not any inherent problem 
in the program. 

Cartridge software is difficult to use with the Translator. Using 
a cartridge backup program which converts them to disk files will 
let you use them with this driver. 

The interface consumes about 20 ma. This should not be a 
problem unless you have substantial extra power supply loads on 
your machine. 

If you have a Ramrod XL or similar board, you could burn the 
modified Translator into an EPROM and install it. This should solve 
the problems with protected software and cartridges. 
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The one piece of software I’ve not been able to get to work 
with this interface is M.U.L.E.. There are at least two versions of 
the program. The earlier one appears to read the ports directly; the 
later one will not run with the OS in RAM. If anyone can tell me 
how to use this interface with M.U.L.E., | will be very grateful! 


— Mark J. Dulcey 
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i OW 01,8, 6, °D: AUTORUN. SYS": TACD 32 1088 DATA 230, 162, 69, 109, 165, 56, 187, 115, 232,; 
c¥ Meso BBUT M148 :6070 20 1090 DATA M6, 119,228, 162, 3, 138, 10, 18, 18, 16, 2 
I 


1100 DATA 211, 234, 234,24, 24, 24, 2K, 2K, 29 
1088 DATA 255, 275, 6, 56, 208, 56, 162, 6, 169, 12, 157,66 1110 DATA 173, 6,211, 41, 1S, 157, 128, 2,173, 16,8 
1018 DATA 3, 32, 86, 228, 162, 6, 169, 3, 157, 66, 3,169 1120 DATA 132, 2, 109, 0, 218, 157, 112, 2, 189, 4 21 
1628 DATA 199, 157,68, 3, 169, 56, 157,69, 3, 169, 8, 157 1130 GATA 116, 2,202, 16, 208, 125, 155, PO 111, at 
1038 DATA 74, 3, 169, 6, 157, 75, 3, 32, 06, 228, 162, 8 114 DATA 112, 181, 144, 116, 32, 97, 100,97, 112,18 
1048 DATA 169,11, 157, G6, 3, 169, 15S, 157, 68, 3, 169, 56 115O BATA 32, 108, 154, 165, 118, 101, 194, 155, 155 
1€58 CATA 157,69, 3, 169, 44, 157, 72, 3, 169, @, 157, 73 1160 DATA 66,114, 101, 11S, 115, 32, 63, 69, 74, 64, 
i068 DATA 3, 32, 66, 228, 169, S, 205, 31, 206, 208, 251, 128 


F i178 BATA 135, ¢ F 
FO7@ DATA 169,6, 141,14, 212, 101, 16, 218, 169, 46,141,227 188 DATA “oases ELLE 
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Reprint from Page 6 of England. 


SONAR SEARCH 
Ron Smith, Cheshire 


Seek... lecate...destery! Sernar Sea 
rch iS 8 submarine hunt gane in the 
Classic style ef seeking targets by 
deduction and logic. You are present 
ed with a@ grid and by using the joys 
tick have te place a cursor in the p 
osition that yeu think the eneny sub 
marine is lecated. You will be given 
@ number that indicateds how far fr 
om the target you are and must then 
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THE HARD(WARE) FACTS’ @ 


EVERYTHING YOUR WANTED TO KNOW ABOUT YOUR ATARI 
BUT WERE AFRAID TO ASK (PART 1) 


We are pleased to welcome John J. Smith to 
our pages with a regular column on hardware. 
John’s articles will feature a mixture of hard facts, 
ideas and projects. You will be shown inside the 
800 and find out what is inside a cartridge among 
many other things in future Hard(ware) Facts. 


JOYSTICK PORTS 


The first thing most people seem to want to 
know is what you can plug into the I/O ports on the 
front of the Atari 800. The answer is many things 
but in order to do so, especially if you build 
something yourself, you will need to know what 
the pin connections are. Figure 1 shows the pin 
connections of port 1 and the remaining ports are 
the same. It is important to note that the connec- 
tions shown are exactly as you see them when 
sitting in front of the computer. The connections on 
the computer are plugs with pins (male) and if you 
want to connect something you will need female 
sockets. These are called 9 way D type connectors 
and manufacturers seem to call them DB9S 
connectors. You will most probably get them from 
your local shop, if you have one, or by mail order 
and everyone seems to have their own part 
numbers. One source of supply is Maplin Electro- 
nics, P.O.Box 3, Rayleigh, Essex and their part 
number for the 9 way sockets is RK61R. | suggest 
that you also use covers to hide the wires and 
solder connections and the Maplin part number is 
RK 62S. These are sometimes known as ‘hoods’. 


Figure 1 - controller port connections 


Pin 1 Joystick - forward 

Pin 2 Joystick - back 

Pin 3 Joystick - left 

Pin 4 Joystick - right 

Pin 5 B paddle (potentiometer) input 
Pin 6 Trigger input | 

Pin 7 5 volts available 

Pin 8 Ground (Earth) 

Pin 9 A paddie (potentiometer) input 


Now that you know what the I/O port connec- 
tions are maybe you want to build something to 
plug in. Let's start with something simple as even | 
have not yet figured out how to build a trackball! 
When | do | will let you have details. How about a 
joystick? At first this seems a good idea but if you 
are a real beginner, even this can be a challenge as 
you have to get the lever to pivot in all directions 
without falling apart No, for your first project | 
would suggest a simple push-button cursor 
control to provide similar controls to a joystick i.e. 
Up, Down, Left, Right and Fire. Five seperate push 
buttons are required and the wiring diagram for 
these is shown in Figure 2. 


A Up or forwerd C Fire button 


Figure 2 E Down or backward 


Note that pin 8 is common to all five push 
buttons and that pins 5,7 & 9 are unused so that 
you only need a six way cable for wiring. One 
possible suggestion for mounting is to use a small 
handy sized box and mount the buttons as shown 
in figure 3. A plastic ring can cover buttons A, B, D 
and E so that a rocking action can be used. How 
you achieve the final design is up to you! 
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the Hobby Shop 
by||Rick-Detlefsen 


Last time I talked about using the [j ck ports, for reading the 
switches of .the joystick and ‘keypad. pbb ies inquiries as to hon 
to do it so this month I will present a block diagram on this. Next 
month I will present the actual circuit to do it. 


Soyshck 
Joy sticlc \ 


Basically you set up a clock circuit to scan each switch, Each 


Switch is an ’A’ circuit. Each sixteen switches is a >B’ Block. ~*Eacr 


204 switches is a ’C’ block. The result of the scanning is placed in 
the joystick port if a valid switch is pressed. Switch number cero iz 
not used. — | 7 

As the counter increments. a voltage is applied to each switch. 
If a switch is pressed. the circuit then assumes that the current 
clock number is to be read by the port. In the future, 


I will ennance 
this by using switch 255 for a special purpose. : 


: Now then, Lo use the ports for output, just follow these ~ 
eteps:A(B)- POKE 54018,546(54019.56)-1/0 control. POKE 


44016, 255 (54017, 255) -set up for output, FPOKE 54018, 60(54019, 60)-the 


: following is data, POKE 54016,DATA(S4017.DATA). Ta change toa 
input-follow the above only instead of FOKE 54016,255(54107) use POKE 
54016,0(54017,0). 


The Block |Hiagran below shows the procedure. Each four bits of 

the port is used to drive a l-of-16 decoder. Only one led can be lit 

at a time, althought high speed may cause more than one to look lit. 
Next month, I will start to present the actual circuits. BYE. 
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